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ABSTRACT 


Argos is a prototype multimedia database developed as both a Battle Group 
Commander's assesment tool and a shipboard data management tool. The current 
prototype developed by using HyperCard/Macintosh demonstrates an effective 
utilization of off-the-shelf technology to solve real world problems commonly faced 
by the United States Navy. The ultimate goal of Argos is to provide database 


Support for the "Paperless Ship". 
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I. INTRODUCTION 


United States Naval Warships by design are self-sufficient entities in both their 
war fighting capabilities and their ability to support sustained open ocean operations. 
It has been determined that an Oliver Hazard Perry guided missile frigate (FFG-7 
class) with a crew of 185 men, nominal 3500 ton displacement, and overall 445 foot 
length carries in excess of 20 tons of paper in direct support of the ship's mission 
and her crew [Ref. 1l:pp. 157-159]. The onboard paper includes executive 
correspondence, required reports, training records, performance evaluations, 
medical/dental records, financial management records, technical manuals, equipment 
operator manuals etc. The reduction of this bulk of paper is the quickest way for the 
U.S. Navy to significantly improve its war fighting capability. Besides the obvious 
increase in war fighting potential of the ship by replacing the 20 plus tons of paper 
with missiles, torpedoes, projectiles, and other offensive or defensive equipment, the 
reduction in manpower required to maintain the paperwork infrastructure would be 
substantial. This thesis will explore the feasibility of the "paperless ship." 

Simple elimination of paper from the ship, of course, is not a solution. We must 
maintain the informational content of the current onboard paperwork while physically 
removing it from the ship. In other words, we would like to convert the entire 
paperwork infrastructure into some electronic media and provide an automated 
system that manages all of this newly stored data. The concept of a "paperless ship" 
was first made popular by a former director of Surface Warfare, VADM J. 
Metcalf,USN (Retired). It was generally believed that the paperless ship could not 


be developed. It was a sweet dream that would not happen. The reason for this 
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pessimism, we believe, stems from the mind set of the people who attempted to 
synthesize a solution by utilizing the wrong technology. 

In the DoD community, relational database management systems (DBMS) are 
widely held as the solution to the information management problem. In fact, many 
agencies under the DoD umbrella require that future (non-numerical) application 
software must be developed by using a relational DBMS that supports the SQL 
query language. The relational DBMS is an improvement over older database 
management systems such as hierarchical and network DBMS, but it is not a panacea 
for all data management problems. The relational DBMS 1s definitely not a solution 
for the paperless ship. It is the wrong technology. 

There are several reasons why the relational DBMS is the wrong technology. 
First, the semantics involved in the non-tactical operations (supported by the onboard 
paper infrastructure) are far too complex to be modeled by the relational DBMS. 
Second, information conveyed by onboard paper comes in various forms such as 
images, variable-length text, graphics, etc., while the relational DBMS is only 
capable of handling fixed-size records. Third, the query language supported by a 
relational DBMS is too difficult, if not impossible, for the average sailor to utilize. 
Lastly, incremental modular construction (i.e., building piece by piece) of the 
System is not practical with the relational DBMS because of the difficulty involved in 
redefining the relationally defined information structure. 

Failure of the relational DBMS does not mean that the paperless ship cannot be 
realized, just as Babbage's failure to use a steam engine to run his first computer did 
not mean that the computer was beyond reach. By applying the nght technology, we 
can take a substantial step toward fulfilling the dream of the paperless ship. But is 


there a technology today that can make the dream come true? After all, it took about 


100 years since the idea was conceived to apply the right technology (electricity) in 
building the first real computer. We believe there is a technology today and have 
built a prototype system to demonstrate that this technology is a viable solution. 

What we need to build the paperless ship is a multimedia DBMS, a database 
management system capable of handling multimedia data including images, signals, 
and text. The ideal multimedia DBMS for the paperless ship must have a easy-to- 
learn and easy-to-use interface for querying and retrieving data, allow modular 
construction of a database, and be operable under various operating systems. 
Unfortunately, there is no multimedia DBMS, capable of supporting traditional 
database functions such as concurrency, security, recovery, etc., beyond managing 
multimedia data, available today. We, therefore, decided to employ HyperCard™! 
for our prototype. 

The HyperCard choice was predicated on several features that other development 
systems do not offer. Specifically, HyperCard's object-oriented properties support 
ease of development and portability and reusability of modules. In addition, these 
same object-oriented capabilities provide the developer with a rapid, interactive 
prototyping environment that greatly enhances debugging and culminates in 
significantly increased robustness than in conventional programming environments. 

HyperCard provides the developer with a great deal of power and a rich set of 
development tools, that when combined establish a degree of compatibility and 
cognitive richness found in few other environments. The human factors engineering 


principles and human interface technology found within the Macintosh operating 


1HyperCard™, HyperTalk™, Stackware™ and Macintosh™ are all trademarks 
of Apple Computer Incorporated. 


system have been extended into HyperCard. This inclusion allows easy development 
of applications that provide the user with an instinctively friendly look and feel. The 
importance of the look and feel is fundamental to a significantly reduced learning 
curve and a dramatically increased level of usability for applications developed in the 
HyperCard environment. The rich set of development tools that extend beyond 
HyperCard enable the developer to easily acquire, manipulate and import text, sound 
and graphics into HyperCard without data conversion. 

The availability, compatibility and cost of peripheral hardware for the Macintosh 
was also a major consideration. All graphics utilized in this application were scanned 
utilizing a two hundred dollar Thunderware™ ThunderScan® and the human voice 
speech was digitized using a two hundred dollar Farallon™ MacRecorder®?. CD 
ROM technology is also available and HyperCard has built in capabilities for 
exploiting this technology. Video driver software, which interfaces with HyperCard 
is also commercially available for many models of VideoDisk. 

To demonstrate the viability of a multimedia database in support of the paperless 
ship project, a functional program called Argos, named after the most famous ship 
builder in Greek mythology, has been developed and tested. Due to limited time and 
resources, this implementation was aimed primarily at the maintenance function: 
specifically the LM2500 gas turbine engine. However, it must be noted that Argos 
is not designed to demonstrate applicability of a specific function, rather its purpose 
is validate the integration possibilities across the entire functional spectrum of military 


units both at sea and ashore. 


*Thunderscan® is copyrighted by Thunderware™, and MacRecorder® is 
copyrighted by Farallon Computing Incorporated. 


This thesis is organized as follows. Chapter II discusses the paperless ship 
problem in detail. A brief overview of the programming environment and its inherent 
language is presented in chapter III. Chapter IV provides implementation details. 
Conclusions and recommendations for follow-on thesis work are presented in 


chapter V. All code and graphical images are contained in the appendices. 


Il. THE PROBLEM STATEMENT 


In the age of long-range over-the-horizon tactical weapon systems, three 
dimensional radars and state of the art propulsion plants, one of the least glamorous 
and most easily overlooked tasks is that of automating the nontactical functional areas 
in a shipboard environment. Efforts that have been ongoing for a number of years to 
implement a Navy wide program to directly support shipboard supply and 
maintenance functions have had limited success; additionally, very little has been 
done to automate routine shipboard administration, personnel, medical and 
operational functions. From an ISIC’s (Immediate Superior in the Chain of 
Command) perspective, whether that be the Battle Group Commander or a Desron 
(Destroyer Squadron) Commander etc, limited information access on a real time basis 
is a Significant deficiency. As has been demonstrated time and again, self sufficiency 
and integrated Battle Group Logistics during any operational contingency is a comer 
stone to the overall success of deployed units. The purpose of Argos is to enhance 
the ISIC’s information access by giving him instant access to the nontactical 
functional data bases from which his ships are operating. Whether the issue is 
locating a spare part in one ship of the force to correct a casualty in another, 
identifying a trained technician to provide a technical assist, collecting retention 
Statistics, checking the training posture of the ships under his command, or 
assembling information to answer any of a myriad of questions that are typically 
solved by cluttering already overburdened communications nets, Argos has the 
potential to immediately alleviate if not solve the information access problem facing 
the ISIC. This alone would positively contribute to reducing a ship's administrative 


overhead of responding to multiple queries. 


While the problem of information access is obviously exacerbated by geographic 
location, it is not limited to the ISIC. Each ship's Commanding Officer faces similar 
problems when attempting to assess his maintenance related support posture; training 
status; operational readiness; medical and dental readiness etc. By eliminating the 
inherent time delays of manually collating information, individual productivity will 
sharply increase. 

Other issues faced by the Navy include the per installation hardware costs. 
These costs quickly become a major issue when a single installation for the SNAP 
II system utilizing the Harris mini computer currently installed in most combatant 
ships today costs $250,000 and it provides a mere four work stations, where as the 
system we are proposing runs on micro computers that cost $500 to $1000 per 
copy. Training costs are another consideration. These costs in terms of both tme 
and money are significantly higher with the SNAP II Harris installation. For 
example in 1983 when this system was first introduced to the fleet, sailors designated 
as “system users" had to be sent to a facility in Texas for two weeks of hands on 
training to guarantee proficiency at no more than the user level. While the absolute 
costs associated with user friendliness are reflected somewhat in training costs, they 
actually go much further and are more difficult to categorize. Specifically we do not 
define menu driven or command line systems as user friendly. The psychological 
resistance of the user to a non user friendly system is particularly difficult to 
quantify, although the bottom line result is a substantial loss in productivity. The 
lack of user friendliness of currently installed shipboard systems results in an 
inability of the user to realize the full potential of the system which in many cases 
ultimately creates more work than the older manual system. Because most systems 


purchased for fleet introduction do not represent proven off-the-shelf technology, 


user base to verify the system hardware and software. This alone detracts from 
system robustness; additionally, further degradations are experienced as a result of 
attempts to model complex data with systems that are technologically incapable of 
performing this function. Consequently, the lack of robustness manifests itself to the 
user as an inability to perform as advertised or desired. 

Correctness of data is crucial to the success of any database system. A key 
element in verification of the data's correctness is the ability of designated personnel 
to easily view the data in a discrete isolated format that is familiar to the viewer. 
Current systems do not provide this capability, thus a preponderance of the data that 
fleet personnel are working with is either incomplete or incorrect. A specific example 
is the SNAP II system. Five years after its introduction to the fleet, substantial 


amounts of money are still being dedicated to correcting the SNAP II databases. 


II. THE PROGRAMMING ENVIRONMENT: 
HYPERCARD 


In this chapter we describe our development tool HyperCard/HyperTalk and 
show how conducive it is for modeling complex data types and developing 
multimedia databases. A relatively new programming environment called HyperCard 
was developed by Apple Computer® Incorporated to run on the Macintosh family of 
computers. It is presently being marketed as an extension to the Macintosh operating 
system. Version 1.2 is used for the development of this thesis. HyperCard is an 
event-driven, object-oriented programming environment that is driven by messages 
to and from objects. Actions are initiated in response to events which then send a 
chain reaction of messages from one object to another. HyperCard, which contains a 
general purpose programming language called HyperTalk, provides powerful 
painting tools, editing functions and semiautomatic program development. 
HyperCard is a multimedia development system that allows developers to easily 
integrate graphics, text and audio into an object-oriented environment. 

HyperCard’s interface is very intuitive and easy to learn; both for the developer 
and the user. The low end of the development spectrum allows non programmers to 
create very professional looking stacks without writing a line of code. At the high 
end of the development spectrum, programmers may create powerful functions and 
commands written in Pascal, C, or Assembler which may not be currently available 
in HyperTalk’s rich instruction set. HyperCard is a tremendous labor saving 
intuitive developmental environment that has extended the concepts of integration in 


software development. 


HyperCard, which uses the metaphor of a stack as an object that can hold both 
processes and data, exists only in the context of a stack. A stack should not be 
confused with the classical data structure stack in which elements may only be placed 
on or removed from the top. A stack is more analogous to a stack of three by five 
cards in which cards may be accessed at any point. HyperCard supports 
development of stacks that allow data, which may be any combination of text, 
graphics and sound, to be stored, linked, searched and viewed. This is the basis for 
multimedia database applications. Information may be linked relationally within a 
stack or from one stack to another. HyperCard was not designed to replace 
traditional relational databases; however, if integrated properly it can greatly enhance 
their capabilities as a front end processor. As a stand alone multimedia database 
developmental tool, HyperCard is clearly a powerful user fnendly system that allows 
applications to be constructed in minutes that would require a monumental effort in a 
conventional programming language. 

As an object-oriented programming environment HyperCard has pre-defined five 
objects. They are buttons, fields, backgrounds, cards and stacks. Some objects 
have a unique HyperCard generated ID which will never be repeated in the same 
stack. All HyperCard objects can send and receive messages; have properties 
including script which is code associated with that particular object; and have a 
visible representation that may be set on or off. A button is an area on the card that 
is accessible with the mouse pointer. Buttons may be graphical, textual, a 
combination of both or totally invisible. When the user clicks the mouse pointer on a 
button, a message will be sent to the button and the script of the button will be 
executed. A field is an area to store textual data on a given card. Fields are not static. 


They may be adjusted to any size or appearance desired. Field scripts, like all scripts 
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scripts in HyperCard, are also event driven. Backgrounds are objects that cards 
oftentimes share giving them a homogeneous look. An example might be the visual 
representation of a ROLODEX card [Ref. 2:p. 112]. Cards are the objects on which 
fields, buttons and backgrounds reside. One to several million cards form a stack. 
The stack along with the four objects it contains (i.e., cards, backgrounds, buttons 
and fields), and any attached resources is the executable program. 

Modularity is a property of objects in HyperCard. Once an object is created it 
may be moved in its entirety to another stack with its graphical appearance, scripts 
(program code) and resources (predefined object code 1.e., icons, dialogs, sound 
etc.) This was extremely important in facilitating rapid prototype development and 
code reusability. 

Message sending is a characteristic of an object-oriented programming 
environment. HyperCard generates messages, called system messages, which are 
sent to objects in response to certain program events. Consequently, the HyperCard 
environment allows development of databases with procedural attachment which 
readily lends itself to modeling of real world data. Procedural attachment is the 
attachment of procedures to data elements and containers which provides behavioral 
characteristics in the form of code. It enables development of multiple data 
associations via dynamic and static linking; thereby resulting in the best of 
conventional database (relational and hierarchical) technology associations. 
Additionally, as a direct result of procedural attachment's ability to support modular 
code in a fully specified high level language the developer enjoys the freedom of 
semantic data modeling. Search, browse and reporting capabilities are established in 


a similar manner. 
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Whenever Script 1s executed a message 1s generated. The first object to receive 
the message is the sending object and if it has a message handler (a subroutine in 
HyperTalk) it will execute the handler. The script can also call the same message 
handler from which it originated. This is recursion in HyperTalk. HyperTalk is also 
capable of nesting. which would occur if handler] in ObjectA calls handler2. 
Capabilities that allow recursion and the creation of procedures as well as push down 
data structures provide the developer with a full range of programming tools found in 
more conventional languages such as Pascal or C. 

HyperCard has two types of objects: transparent and opaque. Transparent 
objects are virtually invisible, that is they allow the viewer to look down to layers 
below the actual top layer. Opaque objects are solid; consequently, they block the 
viewer from observing objects situated directly below. Every HyperCard object is 
created in its own layer. Layers can best be visualized as ultra-thin sheets of clear 
plastic [Ref. 2:pp. 109-110]. Since every object gets created in its own layer, the - 
layers are placed one on top of the other as the objects get added to the stack. Opaque 
objects are visible through all layers of the stack regardless of their relative stack 
position; unless however, they get covered by another opaque object in a subsequent 
layer which would render the lower object impossible to be seen by anyone looking 
down. Transparent objects allow the viewer to observe opaque objects below. 
Buttons, which are a type of HyperCard object, can be layered into a stack like any 
other object: whether transparent or opaque, buttons will react to mouse clicks 
regardless of depth in a layer. If buttons are layered on top of each other only the top 
button will respond to a mouse click. Visibility is a property which many HyperCard 
objects possess. It is clearly different from transparency. That is, when an object's 


visibility is set to false the object not only cannot be seen but is also inactive. 


but is also inactive. However, attributes of an object, whose visibility is set to false 
may be obtained or changed through the scripting language. Visibility and layering 
together provide the developer with the ability to construct complex data structures 
and establish inheritance of code by layering buttons on top of one another and 
passing discrete commands on to various layers. This is a very powerful tool that in 
general facilitates compactness and reusability of code. Specifically, the invisible 
button was essential for the development of Argos because it is the mechanism by 
which the user is able to define a pathway to a desired piece of equipment, 
subcomponent, or piece part. All that is required is for the user to click on a graphic 
and Argos will respond by displaying a blowup of the selected graphic. 
Background and card layers are the second category of layer in HyperCard. 
Everything assigned to a background is active and visible on every card of that same 
background in the stack, that is anything placed into a background design gets copied 
onto every other card with the same background: this includes graphics, text, and 
buttons. The programmer may choose to place graphics, text, or buttons onto a 
specific card and have them visible only when that particular card is the top card in 
the stack, by placing those objects into the card domain. All objects in the card 
domain are in the very top layers of the stack with background objects lying below. 
The card domain can also be called the foreground. Conceptually, it is very 
important to note that card objects are visible and active only in their respective 
layers, whereas background objects are visible and active for all cards sharing a 
particular background. In terms of creating applications, this subtle difference 
between foreground cards and backgrounds becomes an indispensable tool for the 
programmer to hide certain action buttons from the user at different points of the 


program by covering up an action button on a background card with an opaque object 
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on a foreground card. Of interest, background buttons can be created only one at a 
time, each in its own layer; however, the user can not discern any difference between 
the two buttons or the two layers because both opaque buttons are readily visible and 
show no obvious indications of being in two completely different layers. Careful 
manipulation of background and card layers enables the programmer to develop a 
particular look and feel that results in very user friendly interfaces. This allows 
complex modeling of data structures that are analogous to everyday metaphors. 
System protection in Argos, which is important for establishing program and 
data integrity, is easily supported by HyperCard because of its inherent stack 
protection mechanism. Stack protection is provided by the system. The level of 
protection is determined by the programmer and is assigned via the PROTECT 
STACK menu which ostensibly allows the programmer to choose any level of 
protection desired. Passwords are available options that can be used to protect a 
particular stack. The password need only be entered once during a session to allow 
access to a given stack. The system will remember that the user knows the correct 
password once it is entered to eliminate the tedious requirement of reentering a 
password on every attempted entry to protected stacks during a single session. A 
more advanced level of protection exists by using the scripting language HyperTalk 
which allows the programmer to limit the data which may be accessed down to the 
data element level. This capability may be extended to password protection which 
can be applied to protect a specific data element or a specific function vice the more 
traditional login password protection schemes currently in use on Navy systems such 
as SNAP II. The traditional login password protection schemes tend to be more 
limited than the Argos password system because the HyperTalk scripting language 


allows complete flexibility in limiting users to specific functions or data elements. 
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Another extremely important aspect of HyperCard is its linking ability. 
HyperCard links are a method of establishing a unidirectional pathway from one card 
to another. Links may be between cards in the same or different stacks regardless of 
either card's relative stack position. Bi-directional links can also be programmed by 
inserting a unidirectional button on each card such that each card has a pathway to the 
other. To establish links between cards in the same stack either the unique card 
identification number is used as a destination address, or the card name can be used. 
Links to cards in different stacks are exactly the same with the addition of the new 
stack name to the destination address. HyperCard linking enables the programmer to 
implement true conceptual relational database applications, that is, data never needs 
to be duplicated as in most other conventional data base systems, 1.e., there is no data 
redundancy. This is accomplished by HyperCard's ability create links via unique 
identification numbers that are independent of data content. 

HyperTalk is a general purpose programming language that contains a robust set 
of commands and functions. It is also a special purpose language that tends to be 
better for some programming tasks than most other languages, such as construction 
of visual databases and educational systems. It is a very intuitive and natural 
language which tends to favor nonprogramers in its grammatical style. This concept 
is further extended by the language property that provides programmers world wide 
the capability to program in their native language. The object-oriented nature of 
Hyper Talk makes the scripting portion of the programs compact, extremely easy to 
debug and very portable from one program to the other. The finished programs tend 
to be very intuitive for the user to operate and have a visual look and feel that in other 
languages would be very difficult to obtain. This makes HyperTalk a very labor 
saving programming language. One of the most powerful features of HyperTalk are 
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the XCMD’s and XFNC’s that allow virtual unlimited extendability. When 
HyperTalk was created two very powerful interface capabilities were installed called 
XCMD (external command) and XFNC (external function). These two items enable 
HyperTalk to search the resource fork of the stack for a command or function if it is 
not found within the stack script. This capability provides virtual unlimited 
extendability to the HyperTalk language. HyperTalk will search the resource fork of 
the stack for an unknown command of type XCMD and likewise will search for an 
unknown function of type XFNC for an unknown function. Therefore when an 
author of a HyperTalk script wishes to extend the language of HyperTalk, he can 
write the function or command in Pascal, C or assembler and move it into the 
resource of the Stack where he wishes to use it. Consequently, extensions to the 
HyperTalk language are always carried with the individual stacks that require them. 
Selected commands and functions from a library of XCMD’s and XFNC’s are easily 
moved in and out of Stacks as desired. 

The HyperTalk scripting language is totally unique among programming 
languages. However, it does derive its basic approach from Smalltalk and Pascal 
resulting in an overall appearance very similar to that of a natural language. 
Command structures are english-like sentences or phrases such as repeat five times 
or put the answer into it. HyperTalk is extremely forgiving in syntax and it allows 
multiple command structure variations. This is a very important distinction in terms 
of ease of programming and project implementation of the Argos prototype because 
it will allow utilization of in-house Navy programming assets which would be a 
significant cost savings. 

Functions in HyperCard may be one of three types: HyperTalk defined, user 
defined, or XFNC. HyperTalk functions behave in the same fashion as 
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conventional programming language functions. When a function is invoked in 
HyperTalk, the HyperTalk scripts are searched in a hierarchical fashion until it finds 
a match. If it doesn’t find a match then the resource fork is checked to determine if a 
XFNC is available. This method of determining function location allows the 
programmer to redefine system functions as well as define entirely new ones. The 
ability to redefine the environment proved to be invaluable as this project progressed. 
For example, amongst others, the “find string" command had to be redefined to 
maintain the "look and feel" we were attempting to create in Argos. The importance 
of XCMD and XFNC can not be over stated. While HyperTalk 1s powerful enough 
to handle most programing requirements, the ability to wnte XCMD and XFNC in 
higher level languages such as pascal or C provides an extremely powerful tool. 
This capability allows discrete external functions and procedures to be executed from 
within Argos. 

There are two sound commands available in HyperTalk, play and beep. Play 
requires a SND type resource to be available in the stack for the voice parameter. 
HyperCard originally came with four sound resources, Harpsichord, Boing, silence, 
and Dialing tones. These resources are the voice in which the command operates. 
The play command is used to play digitized sound or to play music from a string of 
notes. Beep is used to invoke the system beep. Another common sound command 
which is a XCMD called Talk?. Talk, which uses another program called 
MacinTalk‘, converts text or phonemes into speech. Both SND and the XCMD 


> The Talk XCMD was create by James L. Paul of Paul Software Engineering. 
4 MacinTalk is a product of Apple Computer Incorporated. 
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"talk" were utilized extensively throughout Argos to appeal to the user's audio 
sense as we continued to develop very user friendly “look and feel." 

The most significant criticism of HyperCard is thatits language HyperTalk is an 
interpretive language. The interpretive nature of HyperTalk in several instances 
noticeably slows execution; however, in other cases, such as searching or card 
selection, HyperCard is phenomenally fast. HyperCard is a very large 
developmental system and requires a minimum of 1 megabyte of RAM to operate. It 
can display only one card of a fixed size, in black and white on the screen at a time; 
however, the illusion of a smaller size card is very easy to implement. HyperCard 
strays from the standard Macintosh interface guidelines, in that the applications 
written in HyperCard are driven primarily by buttons vice the pull down menu style 
of all other Macintosh applications. Some of the built in features which allow easy 
access to the system routines, such as the answer command, have a one line text 
limitation in the question variable. Many of these weaknesses have been remedied by 
individual programmers and are readily available in the public domain in the form of 
XFNC’s (external function) and XCMD’s (external command), which are wnitten in 


Pascal, C or Assembler and extend the HyperTalk language. 
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IV. IMPLEMENTATION 


As designed and implemented the Argos prototype is based upon a series of 
graphical stacks that allow the user to visualize images of what he or she is dealing 
with. For example, rather than relying upon conveying the meaning of an LM2500 
gas turbine engine and all of its component parts through a textual description, as is 
required by conventional database schemes, Argos provides the user with a visible 
graphic interface that is coupled with a technical textual description thereby reducing 
the technical knowledge required to be proficient in using this software. 

The stack construct allows strict adherence to modular design. This is critical to 
any dynamic software system that is expected to be responsive to periodic updates 
resulting from organizational changes, equipment additions and removals, personnel 
receipts and detachments etc. By maintaining strict modularity, changes can be 
implemented readily as they occur with no adverse side effects to other modules or 
perturbations to other system users. 

The user enters Argos at the Battle Group level which enables one to choose a 
ship by name and then to choose one of the functional areas each of which is a 
discrete stack. Six functional areas were modeled in Argos: maintenance, supply, 
operations, medical, administration and personnel. This by no means was intended 
to be all inclusive or static, rather it merely represents the types of functional areas 
that may be modeled in the system. There are conceptually six virtual stacks (one per 
functional area) for each ship in the Battle Group. Each functional area is represented 
as a virtual stack because within each virtual functional area stack are the actual 
individual component stacks. That is, each piece of equipment installed in any ship 


modeled by Argos has its own stack that represents the myriad of subcomponents 


A 


that are integral to that piece of equipment. This demonstrates the modularity 
referred to above. As equipment upgrades occur and components change, only one 
stack needs to be updated, not the entire software system. This concept can be taken 
a step further. When a new ship 1s under construction, a complete software system 
such as Argos can also be installed by simply taking copies of the equipment 
modules along with modules for the other functional areas and simply placing them 
aboard the ship upon delivery to the Navy. 

Argos has been developed to represent discrete functional areas common to 
every ship of the Navy rather than limiting the implementation to a single facet or 
functional area. Underlying the Argos system 1s the ability for complete integration 
of data. This facilitates data sharing amongst the functional areas and enables the 
user to make ad hoc queries because of the uniform interface that acts as a template 
for the Argos system. From the Battle Group level this allows module integration 
for such queries (1.e., list by name and pay grade all of the gas turbine technical . 
experts currently in the Battle Group). As a result of the modularity this entire 
system is very dynamic and can be expanded to model anything from a 172 foot 
diesel Minesweeper to a 1092 foot nuclear propulsion aircraft carrier by adding and 
deleting modules as appropriate. The modularity aspect of Argos makes it reusable 
software because discrete modules can be changed to reflect actual shipboard 
changes. Since a small desk top microcomputer is being utilized, the software and its 
computer can be literally hand carried or mailed any where in the world and be used 
within minutes of receipt. 

Modular design was crucial to the success of this project. HyperCard was very 
important in this regard because it easily enabled us to achieve complete modularity 


due to its ability to represent a hierarchical scheme, relational scheme and 


object-oriented scheme. Hierarchically it is able to represent the organizational 
infrastructure of the Navy (ISIC to Unit). Relationally it is able to represent any of 
the normal relations typically associated with conventional shipboard database 
applications. Argos also contains object-oriented database capabilities because each 
card contains both data and instructions. 

Argos represents a mutimedia database. Graphics are utilized to represent 
objects that heretofore were solely represented by textual descriptors or attributes. 
Textual information is utilized to enhance the meaning of and further define whatever 
object the user is currently viewing. Audio is utilized as an additional feedback 
mechanism which is normally implemented solely in text if at all. When taken in 
aggregate, Argos makes use of the underlying features of multimedia to create a 
significantly more intuitive environment for the uninitiated or novice computer user. 

Background buttons, which appear on every card of a stack that utilizes a given 
background, are an integral part of the look and feel of Argos. Examples of these 
background buttons include HELP, COSAL, Equip, CSMP, APL, Forms, Order, 
Techman etc. See Appendices A thru H for further amplification. The HELP button 
allows the user to quickly refer to a system reference manual should he or she get lost 
while navigating through any portion of this system. The ORDER button enables the 
user to automatically fill in and print out a requisition document for any piece of 
equipment or sub component modeled. The AWR button provides the user with the 
capability to automatically generate an equipment degradation report and to update the 
CSMP (Current Ship's Maintenance Project) once the required parts have been 
ordered. The TECHMAN button gives the user instant access to the pertinent 
sections of the technical manual that apply to the piece of equipment he or she is 


currently viewing. The COSAL, CSMP, EIC, and APL buttons allow the user 
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instant access to the entire ship's COSAL, CSMP, EIC, or APL for browsing should 
that be desired. The miniature card button located in the upper left of every card 
enables the user to return to the previous card viewed and in this manner can literally 
back out of the graphical path just navigated. The ship button located in the upper 
right comer of every card provides the user with the ability to return to the beginning 
of the graphical hierarchy of the maintenance stack so that multiple components can 
be investigated without having to exit and reenter the program. See Appendix F 
(Help Stack) for further information on buttons and icons. 

All graphic buttons are invisible so that they can be positioned over the various 
graphics found on each card. For example, on each component card of the 
maintenance stack the graphic in the upper left corner changes from card to card yet 
the functionality of the button does not change 1.e., to return the user to the previous 
card viewed. Special buttons are also utilized throughout this program. On the 
COMPRESSOR REAR FRAME/COMBUSTOR card the AIR SEALS button allows 
the user to advance to a different card that displays the air seals hidden between the 
compressor rear frame and the combustor and therefore not visible. Similarly, on the 
HP COMPRESSOR STATOR cards the ALT VIEW button enables the user to view 
different aspects of the HP compressor stator in order to see all sub components. 

The HELP stack is an integral part of this entire program. It has been developed 
to provide the user with an intuitive look and feel that will answer any program 
specific questions that may arise at any level or point within Argos. HELP has a 
search function that eliminates the need to page through the entire stack to answer a 
single question and it fully defines the functionality of all background buttons. 

Argos also includes all of the nontactical data files required by the maintenance 


functional area as stacks. The COSAL (Coordinated Ship's Allowance List) 


delineates every piece of equipment that ship is allowed to have installed. The APL 
(Allowance Parts List) provides every repair part allowed to be carried in support of 
the installed equipment. The EIC (Equipment Index Code) provides part numbers 
for every subcomponent on a given ship. The FORMS stack has a card for every 
form required by the Maintenance functional area for the conduct of day to day 
business onboard any U.S.Naval warship. 

In addition to the functionalities described above, several scripts were created in 
order to automate the development process. For example one developmental button 
was designed to rewrite all of the scnpts on the graphics buttons on an individual 
card. Another script was wnitten to automatically retrieve card id's for linking 
graphical parts to an associated card in the APL stack. See Appendix H for 
developer script listings. This capability significantly enhanced the development 


effort of Argos. 


V. CONCLUSIONS 


Argos has demonstrated that multimedia technology can be effectively used to 
create functional useable systems with significant advantages over conventional 
technology. Development time utilizing this technology is dramatically reduced due 
to its object-oriented nature, system environment, and rich set of development tools 
readily available throughout the development process. Prototype testing and 
demonstrations have verified the user friendliness of this system. Software 
maintenance on the Argos system tends to be relatively easy primarily due to its 
modular design. Consequently, the ripple effect so often associated with making 
changes to conventional software systems is totally avoided. Single component or 
functional stack updates or replacements are quick and quite easy to implement 
because there is very little data, if any, carried from one module to the next. 

Unequivocally, the cost of this technology is a tremendous advantage. As 
mentioned earlier, development, maintenance, and training time are greatly reduced 
compared to software systems developed using conventional technology. The 
Argos development software itself was also very inexpensive. For example, the 
HyperCard software cost only fifty dollars and all other software tools utilized 
throughout prototype development cost less than five hundred dollars. Argos was 
developed on a Macintosh II with a 40 megabyte hard drive and a Macintosh SE with 
a 20 megabyte hard drive. The Macintosh II, however was not necessary to develop 
or run the completed system. A Macintosh plus or SE is quite sufficient to develop 
and operate the system; however, a slight speed advantage is noticeable between the 
Macintosh II and the SE and between the Macintosh SE and the plus. The Macintosh 


II system of this configuration may be purchased commercially for less than $6,000 


and the SE for less than $3,000. An Apple imagewriter printer was also required to 
operate the scanning device. An image writer printer is commercially available for 
less than $500. The audio and graphic digitizers cost less than $500 combined. In 
order to fully implement this technology a mass storage device such as ROEM 
(removable optical erasable media) must be incorporated and these are available for 
approximately $2000 to $5000. 

The level of user friendliness achieved in this implementation greatly contributes 
to significantly reduced training time and associated costs. There is no complex 
query language or command set for a user to remember, consequently a new user 
with rudimentary keyboard skills could be proficient with the Argos prototype 
system literally in a matter of minutes. This system requires only semantic or 
recognition knowledge rather than syntactic or rote knowledge for the user to become 
fully functional. Additionally, there is a uniform interface throughout Argos that 
further reduces training requirements and enhances usability. 

The data has been optimized as a result of the system design. It is not redundant 
and may be further broken down into discrete stacks so that only the subset of 
interest must be traversed to find a particular data element. Data relations such as 
components or personnel must only be represented once and they may be freely 
linked to other functional areas for access and retrieval. Most of the functional 
operations are predefined by the implementation and new or altered operations may 
easily be added. 

The data for the most part is stored as an integral part of the program stacks and 
are not discrete files. However, data is easily exported and imported from the stacks. 
At this stage of development the search algorithm is fully developed to support ad 


hoc textual queries; however, the ability to extract data from multiple stacks 


simultaneously does not exist and is dependent upon the implementation of a 
complex query language. Also, there is no system facility to allow multiuser 
accesses and updates as is typically found in conventional data base technology. All 
data can be stored in the ROEM format. Password protection in HyperCard can be 
implemented to protect individual stacks as well as specific user functions such as the 
approval feature in Argos to control the expenditure of funds when ordering repair 
parts. While this technology is not designed to replace conventional database 
technology, it does have certain advantages that make it very desirable for 
applications such as Argos. Conversely, an application that requires thousands of 
transactions a second would not be appropriate for development in a multimedia 
programming environment. 

Argos also offers a simplistic graphical interface to the shipboard supply 
support system. While current shipboard systems such as SNAP I are attempting to 
provide an interface to the supply system for maintenance related interactions, Argos 
takes this a step further by providing the technician with a mutimedia interface that 
uses the concept of user fnendliness as its point of departure. By making the 
System as easy as possible to utilize, individual productivity for all users will 
significantly increase. 

In terms of cost, Argos compares favorably. While systems currently installed 
use relatively expensive one of a kind mini computers built upon older technology, 
Argos is predicated on strictly off-the-shelf current, yet advanced, technology that is 
readily available in the market place. In terms of hardware, Argos requires a micro 
computer that is considerably less expensive as a capitol investment, yet for the 
application under consideration micros are every bit as functional as the larger more 


expensive mini computers. Micro computers have the added advantage of 


significantly reduced space requirements for installation. With a much smaller 
footprint, the entire micro installation can easily sit an a desk which is a major 
consideration when discussing small combatants. 

When considering unique one of a kind mini computer installations one must 
also consider the availability or nonavailability of hardware system repair parts. 
Unique hardware systems typically have unique repair parts which can lead to sole 
source contracting. Sole source contracting normally is not advantageous to the 
government and can lead to increased down time due to repair parts nonavailbility 
and to increased costs due to a lack of fair and open competition. Unique computer 
hardware systems that have very small user bases often times are dependent upon the 
end user to identify bugs that have evaded the design engineers. This in itself 
becomes a major factor in reduced productivity when utilizing a system that was 
supposed to increase, not decrease, productivity. 

When discussing off the shelf micro computer hardware systems, world-wide 
parts and technical support are quickly identified as very important benefits. 
Contracts for repair parts are easily bid utilizing full and open competition because 
now there are third party vendors who can compete with the parent manufacturer to 
supply repair parts at the best possible price to the government. Given the mobility of 
a true blue water Navy such as our own, hardware technical support becomes an 
issue if problems that can not be solved by indigenous assets become dependent 
upon contractor support that must literally travel half-way around the world often 
times under adverse geo-political conditions. When assessing the desirability of a 
unique minicomputer hardware system versus an off the shelf micro computer 
hardware system one must also consider the limited user base the mini computer 


system has as opposed to the exceptionally large user base of the micro computer 


system. With a user base that is orders of magnitude larger, inherent hardware 
design problems are typically well identified and corrected long before their 
installation in Naval ships. Additionally, as a direct result of having a world wide 
user base, the parent manufacturer is considerably more dynamic in providing 
technical support because that mechanism is already in place to support his other 
customers. In essence the parent company must survive in the market place on its 
reputation. 

In terms of software development for the Argos system, the HyperCard 
programming environment coupled with its indigenous programming language 
HyperTalk have provided a means of easily developing complicated software 
systems. Simply put, HyperCard in effect places layers of abstraction between the 
programmer and the actual bit manipulation that goes into creating complex software 
systems. Now for the first time government agencies are no longer tied by an 
umbilical cord to software development consultants and their respective companies 
because complex database applications can be developed using in house assets. In 
an age of increased congressional scrutiny and obvious fiscal austerity it only makes 
good common sense to utilize in-house assets for areas such as software 
development, particularly when the Department of Defense continues to order mid- 
grade military officers to the Naval Postgraduate School to follow a course of study 
in any number of technical curriculums, one of which is Computer Science. 
Utilization of military officers holding advanced degrees in computer science for 
development of software systems similar to Argos rather than relying upon 
contractors would have significant cost reducing ramifications. Development time 


would also be sharply reduced because now the developer has a more intimate 


knowledge of the end users of the system under development and a better feel for 
how this system should interface to the big picture. 

Another advantage of using off the shelf technology for software system 
development is that by not having to completely develop a new system for each 
application, development costs even for contractors would be sharply reduced 
thereby passing real dollar savings on to the Department of Defense. As a prototype 
and when fully implemented Argos is designed to be completely modular. This will 
allow all new equipment procurement contracts to stipulate that the contractor must 
deliver an Argos application for the equipment being delivered to the military thereby 
eliminating the need for continued software development. 

In a fully developed Argos system the capability will exist for allowing multiple 
ad hoc queries of the various non tactical data bases for each ship individually, or the 
Battle Group as a whole entity. The obvious advantages of developing similar 
HyperCard systems for the military in general easily outweigh the disadvantages. 
Specific areas that would support continued research in multimedia technology 


include but are not limited to the following: 


¢ Transport Argos to MS DOS, UNIX or some other operating system. 
¢ Development of a multimedia semantic data model (MSDM). 


¢ Conceptual design of the Navy's data requirement using MSDM to fully 
support the paperless ship concept. 


¢ Development of an Argos capability to share data files with an operational 
MICRO-OMMS system in Foxbase. 


¢ Extension of Argos to fully develop one or more of the functional areas. 
¢ Development of a complex query language interface capability. 


¢ Conduct a feasibility study that would project the cost of a fully operational 
Argos system. 


¢ Investigate the size requirements for different configurations of the Argos 
System. 


¢ Conduct a study that would determine implementation and cost factors 
associated with inclusion of ROEM technology. 


¢ Develop Argos on a Next Computer in the Next Step Object-Oriented 
dab, System which is also available on other than Next computer 
hardware. 
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APPENDIX A 
ARGOS STACK 
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SCRIPTS FOR STACK: Argos 


** STACK SCRIPT ***** #8 #8 eK EEK KE eee KK KE EE KE Ke 


on openStack 
global mode 
-- mode may be any of the following types: 
-- Mavigate - traverse through the graphical hierarchy 
-- order - for ordering an item via graphics 
put "NAVIGATE" into MODE 
hide message box 
hide menubar 
set userlevel to 5 


end openStack 


on closestack 
-- this handler will automatically compact stack 
if the freesize of this stack > 0.15 * the size of this stack then 
doMenu "Compact Stack" 
end if 


end closestack 


on gohome 


play "BYE" 


end gohome 
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function CLICKLINE 
-- this function will retum the line number of a field where a 


-- mousedown event has occurred 


return trunc(((scroll of the target)— 
+ (item 2 of the clickloc) - (item 2 of the rect of the target— 
)) div the textheight of the target) + 1 


end CLICKLINE 


function JULIANDATE 
-- returns julian date 
put the date into CURRENT 
convert CURRENT to seconds 
put “1/1/" into FIRSTDATE 
put char 4 to 5 of third item of the long date after FIRSTDATE 
convert FIRSTDATE to seconds 
put char 5 of third item of the long date into YEAR 
return YEAR & (CURRENT - FIRSTDATE) div 86400 + 1 


end JULIANDATE 


a 3k BACKGROUND #1: GRAPHIC PS SL SE SESE SESS SES SSeS SS SS SS SSeS eS SAS SS 
on closecard 


-- this handler will automatically reset cards to original state 


-- if field "Description" is visible 
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if visible of field "Description" = true then 
set lockscreen to true 
hide field "Descnption” 
repeat with i=] to the number of buttons 
show button 1 
end repeat 
show background button "sorry" 
set lockscreen to false 
hide msg 
end if 


end closecard 


on ARGOSTALK x 


this handler will speak in computer voice the text contained in 


-- x. This procedure requires several TALK XCMD's and MacinTalk 


-- must be in the system folder. 


f hilite of background button "VOICE" = true then 


bt @ 


TALK x, 160, 115 
end if 
end ARGOSTALK 


on closebackground 
-- reset Mode button 


set name of background button id 40 to "Navigate Mode” 


end closebackground 
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On opencard 


-- this handler will speak in computer voice the text conatined in 
-- x. This procedure requires several TALK XCMD's and MacinTalk 
-- must be in the system folder. This procedure will be invoked 


-- only if the individual card does not have an OpenCard Handler. 


pet 


f hilite of background button "VOICE" = true then 
TALK FIELD "NOMENCLATURE", 160, 115 

end if 

show card picture 


end opencard 


on returnkey 
-- this 1s a redefinition of the returnkey function 
-- for the purposes of automating the find string command 
-- sO the user may simply hit return in order to find the next 
-- occurence of a find string in both the description field or 
-- the nomenclature field. HyperCard doesn't support this without 


-- a custom handler. 


if (char 1 to 11 of msg) = "find string" then 
put the id of this card into tempid 
if visible of field "Description" then 
set lockscreen to true 


send retumKey to Hypercard 
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if tempid <> id of this card then 
go recent card 
hide card picture 
set visible of field "Description" to true 
repeat with i=l to the number of buttons 
hide button 1 


end repeat 


hide background button “sorry 
end if 
set lockscreen to false 


else 


send retumKey to Hypercard 
end if 


else 


send returnKey to Hypercard 


end if 


end returnKey 


On GRAPHIC linenumber 


this handler provides the functionality for the transparent 


graphics buttons found on the illustrated parts breakdown. 
-- This handler provides for both the navigate and the order mode. 


-- The parameter linenumber corresponds to the sequence number of 


the card button from which it was called. On the the equivalent 
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line number of the field "DATA" there are two elements which 
are the GRAPHIC data link id of the next card in the Hierarchy 
the second element is the id of the card in the COSAL stack which 


contains some of the data associated with a given part. 


put first item of line linenumber of field "DATA" into GRAPHICLINK 


put second item of line linenumber of field "DATA" into DATALINK 


GLOBAL MODE 
if MODE = "ORDER" then 
if DATALINK = " NONE" then 
play "ITEM NOT FOUND" 
exit GRAPHIC 
end if 
push card 
Set the cursor to 4 
set LockScreen to TRUE 
go to CARD ID DATALINK of STACK "COSAL" 
put field "ITEM NAME” into ITEMNAME 
put field "APL" into APL 
put field "SOURCE CODE" into SOURCECODE 
put field "COG CODE" into COGCODE 
put field "MAT! CONTROL CODE" into MATLCONTROLCODE 
put field "STOCK NUMBER" into STOCKNUMBER 
put field "UNIT OF ISSUE” into UNITOFISSUE 


go to stack equipment 
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find APL in field "APL" 
put field "UIC" into UIC 
put field "WC EQPT" into WCEQPT 
put field "EIC" into EIC 
go to stack forms 
go to first card of background "NAVSUP 1250" 
domenu new card 
put JULIANDATE() into field "REQN DATE" 
put ITEMNAME into field "NOUN NAME OR REF SYM" 
put APL into field "APL/AEL/CID" 
put UIC into field "UIC" 
put WCEQPT into field "WC" 
put WCEQPT into field "DEPT NO" 
put EIC into field "EIC" 
put SOURCECODE into field "SC" 
put COGCODE into field "COG" 
put MATLCONTROLCODE into field "MCC" 
put char 1 to 4 of STOCKNUMBER into field "FSC" 
put char 5 to 13 of STOCKNUMBER into field "NIIN" 
put char 14 to 15 of STOCKNUMBER into field "SMIC" 
put UNITOFISSUE into field "U/I" 
put "X" into field "YES" 
set the cursor to 1 
set lockscreen to false 


select text of field "URGY" 
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-- get data and stick into order card of stack forms 
-- go to other stacks 


-- go to order card (pop card to come back) 


put "NAVIGATE" into MODE 
play "NAVIGATE MODE" 
else 
if GRAPHICLINK = "NONE" THEN 
PLAY "YOU HAVE REACHED" 
ELSE 
if GRAPHICLINK = "INCOMPLETE" THEN 
PLAY "SORRY THIS AREA HAS NOT" 
ELSE 
PUT THE SHORT id of this CARD into UPLINK 
VISUAL EFFECT ZOOM OUT 
go to card ID GRAPHICLINK 
-- the next line of code dynamically sets the uplink path of 
-- the hierarchy 
PUT UPLINK INTO field "UPLINK" 
end if 
end if 
END IF 


end GRAPHIC 
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** BKGND #1, FIELD #1: Description 


wee eae ake eke ake ake ake ee ade ake eae eae eae ae ake ae eae ee eae eae ae ae 


on mouseup 
-- this handler turns show field "description" off and 
-- show the card picture with associated buttons on. 
show card picture 
set the highlight of background btn "VOICE" to true 
set visible of field "Description" to false 
repeat with i=l to the number of buttons 
show button 1 
end repeat 
show background button "sorry" 


end mouseup 


** BKGND #1, FIELD #5: data (GA a Hola rai HOGI rai I Hai i Ir 
-- EACH LINE NUMBER OF THE FIELD CONTAINS TWO DATA ITEMS WHICH 

-- CORRESPOND TO A BUTTON NUMBER. LE. LINE 1 CONTAINS DATA FOR BUTTON 12 
-- THE FIRST ITEM IS THE CARD ID OF THE CHILD OF THIS ITEM 

-- THE SECOND ITEM IS THE CARD ID OF THE CARD IN THE COSAL STACK WHICH 


-- CORRESPONDS TO THIS ITEM 


** BKGND #1, BUTTON #1: TECHMAN 


Me oe ae Me eae eee eee eae eee ake eae eae eae eae eae ae ae ae ake 


on mouseUp 


-- this handler toggles between showing field "description" and 


ge 


-- showing the card picture with associated buttons. 
PLAY "TECHMAN" 
if visible of field "Description" = true then 
set the highlight of background btn "VOICE" to true 
show card picture 
hide field "Description" 
repeat with i=l] to the number of buttons 
show button 1 
end repeat 
show background button "sorry" 
else 
hide card picture 
show field "Description" 
repeat with i=l to the number of buttons 
hide button 1 
end repeat 
hide background button "sorry" 
end if 


end mouseUp 


a BKGND #1, BUTTON #2: Order KEHEEKKKEKKEKEKEKKEKKKEKKEKKKKEKEKKEKEKKEKERE 
on mouseUp 

PLAY "PASSWORD PLEASE" 

play "ORDER MODE" 


GLOBAL MODE 


Le 


put "ORDER"into MODE 

set name of background button id 40 to "Order Mode" 
play "MAKE A SELECTION" 
ANSWER "MAKE SELECTION" with OK or CANCEL 

if it = "CANCEL" then 

Put "NAVIGATE" into MODE 

PLAY "NAVIGATE MODE" 

set name of background button id 40 to "Navigate Mode" 

end if 


end mouseUp 


** BKGND #1, BUTTON #3: HELP #084 GH iG i ii i iok i to i iofoto i i toi toi io iokei 
on mouseUp 

PLAY "HELP" 

push this card 

go to stack "ARGOS HELP" 


end mouseUp 


a BKGND #1, BUTTON #4: COSAL We whe ah abe ae ae ake ae ae ae hae ae ake ake ae ade ae agence ake ake ake ake ake ake ae ae ake ake 
on mouseUp 

PLAY "“COSAL" 

push this card 

go to stack "COSAL" 


end mouseUp 
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** BKGND #1, BUTTON #5: EQUIP he ak ak ak kak ak ak ak ak ake ak ake ak ak ako ak ak ak kak ake ak ake ake akc ake akc ak ak ake ake ake ake ake ak 
on mouseUp 

PLAY "EQUIPMENT" 

PUSH THIS CARD 

GO TO STACK "EQUIPMENT" 


end mouseUp 


a BKGND #1, BUTTON #6: APL MK akc ae ake ake she ake af ae ae he ae af ake ae ae ae ae ae ae ae ae ae ae ae ae ae ake ake ak ak ae ak akc ak ak 
on mouseUp 

PLAY "APL" 

push this card 

go to stack "APL" 


end mouseUp 


** BKGND #1, BUTTON #7: NAVIGATE 


ak ae aie eae ak ak ae oake ae ae ae ake ae ake aoa ak ae ae ae ae ake aoe ak oak oak ae ake ke ake ae ke ok 


on mouseUp 
PLAY "CSMP" 
push this card 
go to stack "CSMP" 


end mouseUp 


** BKGND #1, BUTTON #8: Sorry Ake ake ak ake ak ak ak ak ake ak ake ake ake ak ak ak ak ake ak ak ake ak ake ak ake ake ake ak akc ake ake ake ake ake ake ak 


on mouseUp 


PLAY "SORRY THIS AREA HAS NOT" 


Ves 


end mouseUp 


** BKGND #1, BUTTON #9: New Button 
we oe oe Kak ak oak oak ok ok kak ak ake ke ake oka ak oak ook oak ake ake eke oko kok ak ok ok 
on mouseUp 

-- goes back to ship side view level 

visual effect zoom out 

go to card id 22260 


end mouseUp 


ae ok BKGND #1, BUTTON #10- UP 222 SSS SESE ESS SS SESS SSS ESS SS SSS SSS SS 
on mouseUp 

-- goes up the hierarchy 

visual effect zoom out 

go to card id field "Uplink" 


end mouseUp 


** BKGND #1, BUTTON #11: Find (#0 i kok i doioioioiokokoi kodak kok ak 
on mouseUp 

-- this handler provides for a modified search. 

put the id of this card into tempid 

PLAY "SEARCH" 

ask"Please enter Search String." 

if visible of field "Description" then 


set lockscreen to true 
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set the highlight of background btn "VOICE" to false 
put "find string" && quote & it & quote && "in field Description" 
into msg 
hide msg 
send returnkey to hypercard 
if tempid <> id of this card then 
go recent 
set the highlight of background btn "VOICE” to true 
set lockscreen to false 
end if 
else 
hide msg 
put "find string" && quote & it & quote && “in field NOMENCLATURE" into 
msg 
hide msg 
send returnkey to hypercard 
end if 


end mouseUp 


** BKGND #1, BUTTON #12: LIBRARY 


Me We ake eke aie aa ae ae ahaa ake age ake ake ae aie ake ake ake ake ake ake ae ake ake ake ake ake ake ake ok ok 


on mouseUp 
PLAY "LIBRARY" 
push card 


go to card library OF STACK "ARGOS" 


ha 


end mouseUp 


a ak BKGND #1, BUTTON 5-24 [eye EXIT PES ESSE EE SEES ESSER ES ES ESS SSS ES ES SS SS 
on mouseUp 

gohome 

go home 


end mouseUp 


** BKGND #1, BUTTON #14: PRINT 
ak oe oak oka ake ake eae oka oak oak kok 
on mouseUp 

play "PRINT" 

doMenu Pmrnt Card 


end mouseUp 


** BKGND #1, BUTTON #16: FORMS 


we ae ae eae ake ake ae ake keke ae ake eae eae ake eke oe eae ke ok ko ke eke 


on mouseUp 
PLAY "FORMS" 
push this card 
go to stack "FORMS" 


end mouseUp 


** BKGND #1, BUTTON #18: VOICE 


ae ome ok ak ake ae oak oe ak ae oe eek ake ke eae aaa aka aa 
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on mousedown 
-- toggles voice on/off 
if the hilite of me then 
ARGOSTALK "VOICE ON" 
else 
TALK "VOICE OFF", 160, 115 
end if 


end mousedown 


%* BACKGROUND Fea) aie ie aie aie aie ae aie aie ae ake ae ae ake ae ae ae ae ake ie eae ake ae a aie ae ae ac ke ak ok 


on openBackground 


end openBackground 


** BKGND #2, BUTTON #1: RETURN 
Tee Cee ee eee ee ee ee ee ee ee ee ee 
on mouseUp 

visual effect zoom out 

go to card id field "Uplink" 


end mouseUp 


** BKGND #2, BUTTON #2: Sorry 2k ake aie ake ake ae ae a akc ai a ai aie akc ak kk a a kak akc kak ak ake ake ake ak ak ake ake ak ak ak ak 
on mouseUp 
PLAY "SORRY THIS AREA HAS NOT" 


answer "This AREA has not been modeled" 


79 


end mouseUp 


* * BKGND #2, BUTTON #3: EXIT PSS ESS SSE SSS ES SESS ESSE SS SESE ESE SES ® SF 
on mouseUp 

GOHOME 

go home 


end mouseUp 


** BKGND #3, BUTTON #1: Retum 
me ae oe ae ae ke ae eae eee ee eee ae eee ea aaa 
on mouseUp 

pop card 


end mouseUp 


a ik BKGND #3, BUTTON fo: EXIT We we We ie ae he eae ae he ae ae ae ae ae ae ae ae ae ae ae ae ae ae ae ae ae ae ae eae he ae ae ae ac 
on mouseUp 

gohome 

go home 


end mouseUp 


* BKGND #3, BUTTON #3: PRINT KkEKKKKKKKKKK KKK KEKE 
on mouseUp 
doMenu Print Card 


end mouseUp 


8 0 


** CARD #1] #3 a Oi Oki i ik i ok i kkk a Oi i i ik i i i i a kk om 


on opencard 
visual effect iris close very slowly 
PLAY START 
PLAY "WELCOME TO ARGOS" 
wait 4 seconds 
go to next card 


end opencard 


kk CARD #2 #3; ORO GGG io iG kok i koi kok ok kook 


on opencard 


end opencard 


** CARD #2, BUTTON #1: Halyburton 
me Me a he a ok kK Kk ok kK KK KK KK 
on mouseUp 

visual effect zoom out 

get short id of this card 

go to card id 10931 

put it into field "uplink" 


end mouseUp 


** CARD #2, BUTTON #5: ABOUT ARGOS 


Me ke a ke ee he ee eee eae eee ake ak ok ak oak ak kk kak 


8 1 


on mouseUp 
visual effect zoom out 
PLAY "ABOUT ARGOS" 
push card 
go to card id 5287 


end mouseUp 


* CARD #3 ae ke ote ake eae a ae a ae ae a ae aaa ae ake aa oe eke aaa 


ON OPENCARD 
play "FUNCTIONAL AREAS" 


END OPENCARD 


** CARD #3, BUTTON #1: Deck Profile 


ae ke ke ee kee eke ka a 


on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 20294 
put it into field "UpLink" 


end mouseUp 


** CARD #3, BUTTON #2: MAINTENANCE 


Me ae oe oe ae ke ake ae ee ae a kak kak kkk kk 


SZ 


on mouseUp 
visual effect zoom out 
PLAY "MAINTENANCE" 
get short id of this card 
go to card id 22260 
put it into field "“UpLink" 


end mouseUp 


** CARD #3, BUTTON #3: ADMINISTRATION 


me ae ae ee ae ae ake ae ae ie ae ae ie ae eae ae eae he he ae ae ae ae ake ae eke ae ee ee 


on mouseUp 
visual effect zoom out 
PLAY "ADMINISTRATION" 
get short id of this card 
go to card id 11414 
put it into field "UpLink" 


end mouseUp 


** CARD #3, BUTTON #4: Operations 


me oe ee ee ee he he ae ake ae ae ake ake ake ake ate ake ake ake ake ake ake ake ake ake ake ke ate ae ae ake ake ake 


on mouseUp 


8 3 


visual effect zoom out 
PLAY "OPERATIONS" 

get short id of this card 
go to card id 14330 

put it into field “UpLink" 


end mouseUp 


* ok CARD #3, BUTTON #5: Medical (ERE S SSS SEES ES SSE SESS ESS SET EES SS ES SS 


on mouseUp 
visual effect zoom out 
PLAY "MEDICAL" 
get short id of this card 
go to card id 13530 
put it into field "“UpLink” 


end mouseUp 


* CARD #3, BUTTON #6: Supply (EES SPE SER EES SESE ESSE ESSE SS SEES SS SS 


on mouseUp 
visual effect zoom out 
PLAY "SUPPLY" 
get short id of this card 
go to card id 13860 


put it into field "UpLink" 


8 4 


end mouseUp 


** CARD #3, BUTTON #7: Personnel 


we ree ae ae ae ae ake eae eae ae ake ake ake eo ake ake ake ake ake eae eee ake ake ake ake ake ke eae 


on mouseUp 
visual effect zoom out 
PLAY "PERSONNEL" 
get short id of this card 
go to card id 14878 
put it into field “UpLink” 


end mouseUp 


** CARD #3, BUTTON #9: ABOUT ARGOS 


me me ie ke ee eke ke ake eke eae eee kee Kae aa aK aa a Kao 


on mouseUp 
visual effect zoom out 
PLAY "ABOUT ARGOS" 
push card 
go to card id 5287 


end mouseUp 
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** CARD #5, BUTTON #1: Engine Room 


Me ak ake kak ak ak ak ak ak ak ak ak ak ak ak ak ak oak ak ke ke ake ak ake ae ake ake ake ake ake ak ake ak ok ak 


on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 2790 
put it into field "UpLink" 


end mouseUp 


** CARD #5, BUTTON #2: Deck Profile 


We ak ke ake ae ae ake ake ae ae ae aka ake ak ak ak ake ae ae ak ak ak oe ak ak ak ok ak ak ak ak ak ok 


on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 20294 
put it into field "UpLink" 


end mouseUp 


** CARD #6, BUTTON #1: New Button 


aK ake ae ak ae ake ak ake ake ak ak ak ake ake ake ake ake ak ak ak ak ak ake ae ake ake ak ake ak ak ak ak ok ok ak ok 


on mouseUp 


visual effect zoom out 
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get short id of this card 
go to card id 2790 
put it into field “UpLink" 


end mouseUp 


** CARD #7: Main Eng Rm Perspective 


me ea ak ak ke ake ake ake ake ake ake keke ke ak ak ak ak ak ak kok ek kek ak kk kk kk 


ON OPENCARD 
ARGOSTALK "ENGIN ROOM LEVEL SLECTION" 


END OPENCARD 


** CARD #7, BUTTON #1: UPPER LEVEL PORT 


me ke ke ak ak ke A OK ak ke kK ok a ke ke OK Ke kK ke KK KK OK KKK OK 


on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 24891] 
put it into field "“UpLink” 


end mouseUp 


** CARD #7, BUTTON #2: Lower Level Port 


Me ak ake ae ak ake ke ak eae ake ake ake ake ake ake ke 2k ake 2k ak ake ok ak ak ok ok ok ok ak ok ok ok ok ok 
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on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 26121 
put it into field “UpLink" 


end mouseUp 


** CARD #7, BUTTON #3: Lower Level Stbd 1 of 4 
Tee eee Se ee eee ee ee ee 
on mouseUp 

visual effect zoom out 

get short id of this card 

go to card id 26624 

put it into field "“UpLink" 


end mouseUp 


** CARD #7, BUTTON #4: Upper Level Stbd 1 Of 7 


ae Me ake ahead ae aeons oe ake ake aeons ake ake ak oak 


on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 25681 
put it into field "UpLink" 


end mouseUp 
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** CARD #7, BUTTON #5: Upper Level Stbd 3 of 7 


Me eae he eae ee ee ae ok ak ok ok ake ak ak ae ak eee eke kak ae 


on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 25681 
put it into field "UpLink" 


end mouseUp 


** CARD #7, BUTTON #6: Upper Level Stbd 4 of 7 


Me ee kee eee eke eee eee eee keke ake eke ak kek 


on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 25681 
put it into field "UpLink" 


end mouseUp 


** CARD #7, BUTTON #7: Upper Level Stbd 5 of 7 


Me ake eae ee ake ke eke kee ake ake ake ae ake ok ake ok ae ok ok ak ok ok ake ake ea ok ak ok ok ok 


on mouseUp 
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visual effect zoom out 
get short id of this card 
go to card id 25681 

put it into field "UpLink" 


end mouseUp 


** CARD #7, BUTTON #8: Upper Level Stbd 6 of 7 


te ok ke ok eo ak ak ak ak ok ak ok ak ak Mee ook ae ae ok ke ake ake ake eek eae ae eke ek 


on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 25681 
put it into field "UpLink" 


end mouseUp 


** CARD #7, BUTTON #9: Upper Level Stbd 7 of 7 


BK OK i i i ok oko oo ook ook i oak ook ok ok ook oak ook ook ook ok ok ok ok ok ok ook ok ok ok ok ok ok ok 


on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 25681 
put it into field "UpLink” 


end mouseUp 


20 


** CARD #7, BUTTON #10: Upper Level Stbd 2 of 7 


me ke kee ae ae ae a ake ake ae ake ake ake ake ake ak oak ake ake ake ake ae ake eae ake ee ok eae ake ake 


on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 25681 
put it into field "UpLink" 


end mouseUp 


** CARD #7, BUTTON #11: Lower Level Stbd 3 of 4 


Me eke ae ake ae ake ae oak aoa ae ae aka aoa ae ake ae eae ae ae ae ae ake ae ake ae ae oe oe ae ae ke 


on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 26624 
put it into field "UpLink” 


end mouseUp 


** CARD #7, BUTTON #12: Lower Level Stbd 2 of 4 


Me ae ake ke ee ae ae ae ake ie ake ae ake ake ake ak eae ake ake ke ok ok ak ake ake ae ae ek ak ak ke kek 


on mouseUp 


al 


visual effect zoom out 
get short id of this card 
go to card id 26624 

put it into field "UpLink" 


end mouseUp 


** CARD #7, BUTTON #13: Lower Level Stbd 4 of 4 


kekkkkkkeheke keke kek keke KK RRR KK RR KK ee 


on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 26624 
put it into field "UpLink" 


end mouseUp 


** CARD #2 #2 a eke kk kk ke kkk kkk dk ik 


ON OPENCARD 
ARGOSTALK "ENGIN ROOM UPPER LEVEL PORT SIDE" 


END OPENCARD 


* CARD #9 REE EEE RE KEK KEK KK 


ON OPENCARD 


i? 


ARGOSTALK "ENGIN ROOM UPPER LEVEL STARBIRD SIDE" 


END OPENCARD 


ak 
ae ak CARD #10 ake ake ke ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ade ake ake ae ake ke ak 


ON OPENCARD 
ARGOSTALK "ENGIN ROOM LOWER LEVEL PORT SIDE" 


END OPENCARD 


** CARD #10, BUTTON #1: Propulsion Gas Turbine 1B 


ake ae ae ake ake ake ake ake ake ake ke ake ake ke ake ake ake ake ake ake ake ae oak ake ake ake ake ake oake ake ake ake ake ok ak 


on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 28371 
put it into field “UpLink" 


end mouseUp 


ak 2 CARD #1] 2k ake ke ake ake ake ake ake ake ake ake ake ake ake ake 2k ake ake ake ake ake ake ake ake ake ake ak ake ake ake ake ake ake ake ake ak 


ON OPENCARD 
ARGOSTALK "ENGIN ROOM LOWER LEVEL STARBIRD SIDE" 


END OPENCARD 


28 


** CARD #11, BUTTON #1: Propulsion Gas Turbine 1A 


we keke ake ake ake ake ke ake ake ok ake ak oke ake ake ake ake ok oak ake ake ade oka ake ok ok ok ak ok ok ake ok ok 


on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 28371 
put it into field "UpLink" 


end mouseUp 


ak xk CARD #12 Me ake ae aie ake ake ake ake ae ae ake ae ae ake ae ake ae ae ae ae ae ake ake ae ae ake ake ake ae ake ake ake ake ake ak 


ON OPENCARD 
ARGOSTALK "GAS TURBIN MODULE" 


END OPENCARD 


** CARD #12, BUTTON #1: Gas Turbine in Module 


ek kak kak aka ak ak ak kakoakokokoako ake ake ako ake ake ako ake ak ake aki ake ako ake ake ake ake ake 


on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 8729 
put it into field “UpLink” 


end mouseUp 


94 


a CARD #13: LM2500 Me a ake ae ake a ae ae ae ae ae cake ae ae ake ae ae ac eae ae eae ake aka ak aka a aK ak ak 


ON OPENCARD 
ARGOSTALK "LM TWENTY 5 HUNDRED GAS TURBIN ENGIN" 


END OPENCARD 


** CARD #13, BUTTON #1: LM2500 GT Turbine Section 


me ee ake ke ae ae aaa ake eke ake ake ake ak oak ake ok ake oko ake oka oko ok ok 


on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 21321 
put it into field "UpLink" 


end mouseUp 


** CARD #13, BUTTON #2: LM2500 Gas Turbine Eng 


Me keke ake ake aie acai ake ak akc ak aka akc aki ake ke ak ak ak ok ak akak akc ako ake ak ak ak 


on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 23316 


put it into field "UpLink" 


oS) 


end mouseUp 


ae CARD #14 Me he ade age abe ae ake ake ake ake abe ake ade ake ae age ae age ade ate ae ate abe ate ake ate ae ae ake ae ae fe ade ode ae ok 


ON OPENCARD 
ARGOSTALK "GAS TURBIN EXPLODED VIEW 1 AL FA" 


END OPENCARD 


** CARD #14, BUTTON #1: New Button 
2k RR kak aR ak ak ak ak aR aR aR aR ak ak ak ake aR ake ak ake ak ak ake ak ake ake ake ak 
-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #14, BUTTON #2: Centerbody Assembly 


We me ae eae ae ae ae eae ae eae ae ae ae ae ae ae eae ae ae ae eae ae ae ae eae ae ae ae ae ake 


-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #14, BUTTON #3: comp rear fr/combustor 


ewe ae nea ae ae ae ae ae ae ae ae eae ae ae ae ae ae ae ae ae ae ae ae ae ae eae ae ae ae ake ake ake 


-- Graphic Handler may be found in this cards background 


On MouseUp 
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GRAPHIC (number of me) 


end MouseUp 


** CARD #14, BUTTON #4: comp. rear stator 1 of 2 
ae eke aie oak eae ae ae ake ae ake ake ake ae ake ake ake oak oak oak ak ie ake eae ak ake ak ak ie oak ae oa ae ak 
-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #14, BUTTON #5: comp. rear stator 2 of 2 
We oak eae ak ake ake ake ake oak ake oak aie oak ake eee eae eke eae eke ak oak ak ok ek ak ak ak 
-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #14, BUTTON #6: HP COMP STATOR 1 of 2 


ae ie ake ake eke ae aoe ake ake ae akeakeakeakeoakakakakakeak ak oe ak oak ake ake ake ake ak ak ak oak ak ak 


-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 
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** CARD #14, BUTTON #7: HP Comp Stator 2 of 2 
KkKkKk KKK KKK KKK KK RRR KR EK KEK KEE 
-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #14, BUTTON #8: Compressor Rotor 
Kk KERR KEKE KEKE KEKE KEKE KEKE KEKE ERE EERE EERE KEK 
-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #15: HP COMp. Rotor 1 of 2 

Me oak oc oe oak ook ake acai eae keke ake ake ake ake eae ake ake ae aka keke ook ok 

ON OPENCARD 

ARGOSTALK "HIGH PRESSURE COMPRESSOR ROTER" 


END OPENCARD 


** CARD #15, BUTTON #1: continue 


RK KKK EKER EEE KEKE KEK KEK KEKE 


On MouseUp 
visual effect zoom out 


get short id of this card 
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go to card id 12411 
put it into field “uplink” 


end MouseUp 


** CARD #16 #7 e Ri kiki iii dd do RR RR RR Be 
ON OPENCARD 
ARGOSTALK "HIGH PRESSURE COMPRESSOR ROTER CONTINUATION" 


END OPENCARD 


a CARD #17 ae ke ae ae ake ake ake ake ae ake ake ake ae ake ae ake ake ake ae ae aie ate ae ae aac ae ake ak ae ae ae ae ak ak ok 


ON OPENCARD 
ARGOSTALK "HIGH PRESSURE COMPRESSOR STATER ALTERNET VIEW 3" 


END OPENCARD 


a CARD #18: HP Comp Stator Me ee ae ate ate ae ake ae ae ae ake ake ae ake ake ake ake ak ake ake ake ake ake ake ake ake ake ake akc ake ake ake ake ake ak ak 


ON OPENCARD 


ARGOSTALK "HIGH PRESSURE COMPRESSOR STATER" 


END OPENCARD 


** CARD #18, BUTTON #1: CLOSE UP 


Me a ke he eae ae ee aa ke aka kaka ake ake ake ake kee ak kak ak ako ak ak ok oak ok ok ok 


on mouseUp 


visual effect zoom out 


oo 


get short id of this card 
go to card id 9423 
put it into field "uplink" 


end mouseUp 


a ok CARD #19 PERSP SESS SLES SEE SESS SEES EES SSE SE SS SS 


ON OPENCARD 
ARGOSTALK "HIGH PRESSURE COMPRESSOR STATER ALTERNET VIEW 1" 


END OPENCARD 


** CARD #19, BUTTON #1: Close up 


ae ak ake ake ake ake ake ae ake ake ake aca ake ae ake ake ake ake ake ake ake ake ake ake ke ae oe ak 


on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 9967 
put it into field "uplink" 


end mouseUp 


a ak CARD #20: HP COMP STATOR ae ake ake ae ake ake ake ake ake ae ake ake ake hake akc ake ake ake ake ake ake ade ake ake ake ake ake ake ae ake ake ake ake ak akc 


ON OPENCARD 


ARGOSTALK "HIGH PRESSURE COMPRESSOR STATER ALTERNET VIEW 2" 
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END OPENCARD 


** CARD #20, BUTTON #1: Close Up 


KEKKKKKKKAKKKAKEEKKEKKEKKEKKEKKKKEK KEKE KE KE 


on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 7832 
put it into field "uplink" 


end mouseUp 


** CARD #21: compressor rear stator 


KKKKKKKKKKKKKEKKEKKKKEKEKEKKEEKEKKKKEK KEK EK 


ON OPENCARD 
ARGOSTALK "COMPRESSER REAR STATER" 


END OPENCARD 


** CARD #21, BUTTON #1: CASE ASSY, CSR1 


REE KKKKEKEKKKKEKKAKKKEKKEKKEKEKKKKEKKKK KK EK 


On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


101 


** CARD #21, BUTTON #2: CASE ASSY, CSR2 


wee mk ek ke ake ake ake ke oka ee ke oe keke keke oe kek ok ok ok ok ok ok ok ok ok ok 


On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


* CARD #21, BUTTON #3 wee ae ade ake aie ae aie ake ade eae ae ae ake ake ae aac ake keke ae ake eae oe aka ok ok ok ok ok 
on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


** CARD #21, BUTTON #4: LINER, VANE DOVETAIL, LH1 


mek ee a ek kee oe ake ake oekaki ok 


on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


** CARD #21, BUTTON #5: LINER, VANE DOVETAIL, LH2 


me eo ok ok oe oe ak oe ook ok ko oe oko oe oak ok ok ok ok ok ok ok Ok 


on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


** CARD #21, BUTTON #6: LINER, VANE DOVETAIL, RH1 


Me oe ok kook eK koko kk eee kek keke ee keke ak ok ak ok ok ok ok ok 
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on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


** CARD #21, BUTTON #7: LINER, VANE DOVETAIL RH2 


ake oak ake ake ake ake ake ake ake ake ake ake ake ake ake ak ake ake ake ake ake ake ake ake ake ake aka ake ak oak ak ak ak ok 


on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


** CARD #21, BUTTON #8: VANE, STG 12, CRS 


ak Me de ak ake ae ake ake ake ake ake ake ake ae oak aoa oak aka oake ake oak ake ak oak ak ak 


on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


** CARD #21, BUTTON #9: VANE, STG 13, CRS 


ie ak aie die ak ake ae ake ae ae ake ake ae ak ake ake ak ake ak ak ok ak ak akc ak ak ak ak ake ok ak ak ak ak ak ok 


on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


** CARD #21, BUTTON #10: VANE, STG 14, CRS 


ie ake Oe ae ake ake ake ake ake ake ae ae ake ake ake kak ake ak ake ak ake ake ake ake ake ake ake ak ak ak ok ak ak ake ok 


on mouseUp 
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GRAPHIC (number of me) 


end mouseUp 


** CARD #21, BUTTON #11: VANE, STG 15, CRS 


mene ek fe ae fee kok ke fe ek ok ok ok ae ae kk ok ek ok ok ok ok ok ie ok ae ok ok 


on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


** CARD #21, BUTTON #12: VANE, STG 16, OGV, CRS 


ak ok ok ok ok Mek ak ak ake ak ok ok ak ok ok ak ok ok ok ok ok ok ok ok ok ok ok ok ok ok ok ok 


on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


** CARD #21, BUTTON #13: GASKET, METAL, O-RING] 


kk kk ok ok ok ok ok kek ok ok ok ak ok ok ok ak ok ak kak ok ak ak ak ak ak ak ak ak ak ak ok ok 


on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


** CARD #21, BUTTON #14: PLUG, MACH-BORESCOPE1 


Me Me ke ie ke kk ke kek koe ok ok oak ke ok 2k ok ok ook ok ok ok ok ok ok ok ok ok ok 


on mouseUp 


GRAPHIC (number of me) 
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end mouseUp 


** CARD #21, BUTTON #15: BOLT, MACH, DBL HEX HD 


Me oa a a a ak ak ak ak ak kok ak ok ok ak ok ok ak ee eke eo ke a ok ak ak ok 


on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


** CARD #21, BUTTON #16: BOLT, BODY BOUND, DBL HEX 


MeO ee ke ee ae ee a a oak ok ke ke ae ee ae ee ake ak oe oak ke ae ke oe ae ak ak ok ok ok 


on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


** CARD #21, BUTTON #17: BOLT, MACH, DBL HEX 


Me ee ie ae a ke ke ae ae ak ae ake ke ake ae ak oak kok keke ak ae ok ak ak ok ok ak ak 


on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


** CARD #21, BUTTON #18: BOLT, BODY BOUND, DBL HEX 


Me Me Ae eee eae ee ak ak ok ak ak ae ake ak kak ok ok ak ak ok ak ak ok ok ak ok ok 


on mouseUp 
GRAPHIC (number of me) 


end mouseUp 
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** CARD #21, BUTTON #19: NUT, SELF LOCK, DBL HEX 


kKkkkkkkkk ke kkk ke kkk kkk KKK KKK KKK KKK 


on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


** CARD #21, BUTTON #20: KEY, CASING 


kKkkkbk kkk kkk kkk ek kke ee hehehehe KKK KK KKK 


on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


* CARD #21, BUTTON #2] KKK KEKE KKK KK KKK KKK KK 
on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


* ak CARD #21, BUTTON +) > -ee SS ESE SESE SESE SESE SSS ES SS SSE SS SS SS 
on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


** CARD #21, BUTTON #23: GASKET, METAL, O-RING2 


Keke KK KKK KEKE KEK KEKE KEKE KK KKK KKK KKK KKK 
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on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


** CARD #21, BUTTON #25: PLUG, MACH-BORESCOPE2 


ae a ake oie ake ake ake ae the ae ae ake ake ae ake ake ae ake ae ae a ak ae ake aoa ae a ak ak ak ak ak ok ok 


on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


** CARD #21, BUTTON #26: PLUG, MACH-BORESCOPE3 


ee ee ee ee ee ee 


on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


** CARD #21, BUTTON #27: CASE, ASSY, CSR3 


Me eae eae ai ie aa ake ae a ae the ake ake acai coke ak ake ae ake ake ok ake ae a ake ake ake ake ake ak ake 


on mouseUp 
GRAPHIC (number of me) 


end mouseUp 


** CARD #21, BUTTON #28: CASE, ASSY, CSR4 


Me ke ae eae ee ake aie aie ae ke ake aie ake ake age ake ae ake ate ake ake ake ake ake ae ake ake ake ake ake ake ake ak ak 


on mouseUp 
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GRAPHIC (number of me) 


end mouseUp 


* CARD 3929) We OW ok ok ok ok KK ok ok ok ok ok ok ok ok ok ok ok ok aK a a Kk kk ok OK Ok Ok 


ON OPENCARD 
ARGOSTALK "CENTER BODY, INLET, COMPRESSER FRONT FRAME" 


END OPENCARD 


** CARD #23: comp rear fr/combustor 
ok kK kK ok ok ok ok ok kk ok ok ok ok ok ok ok ok ok ok ok ok ok ok ok ok ok ok ok Ok Ok Ok Ok Ok 
ON OPENCARD 
ARGOSTALK "COMPRESSER REAR FRAME, COMBUSTER" 


END OPENCARD 


** CARD #23, BUTTON #1: Air Seals 


Me ok ok kk ko kk ok kk ok ok Kk ok kk ok ok ok ok ok ok ok ok ok ok ok ok 


on mouseUp 
visual effect zoom out 
get short id of this card 
go to card id 2535 
put it into field "uplink" 


end mouseUp 


* * CARD #25 3K ok ok ok ok ok ok ok ok ok ok ak ak ok ak ok ok ak ak ok ok ok ok ok ok ak ak ok ak ak ak ok ok ak ak ok 
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ON OPENCARD 
ARGOSTALK "GAS TURBIN EXPLODED VIEW 1 BRA VO" 


END OPENCARD 


* CARD #26 PERS SES SES ESSE SES SSS ES SSS EES SS ES SS SS 


ON OPENCARD 
ARGOSTALK "Inlet Gearbox Assembly Breakdown" 


END OPENCARD 


** CARD #26, BUTTON #1: GEARBOX ASSY, INLET 
Me ae ae oe ake koa ae oak ae ae ae oak ae oa ae oe eae ak ok ak ok ake ok keke ke ke ok 

-- Graphic Handler may be found in this cards background 
On MouseUp 

GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #2: ADAPTER, SHAFT, GEAR 
ee eee eee eee eee eee ee ee ee ee ee 
-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 
end MouseUp 
* CARD #26, BUTTON #3: SHIM -E PSS SESE ES ESS ES ES SESS SSS SSS ES SS SS SS | 
-- Graphic Handler may be found in this cards background 


On MouseUp 


OS 


GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #4: ADAPTER PLATE 
eHREEKEKEKKEKEKEKEEKEKKEKEKEKEKEKEKEKEKEKEKESL KK & 
-- Graphic Handler may be found in this cards background 
On MouseUp 

GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #5: ADAPTER BLOCK 
eR RRR ROR ORR Rk Rk ROK ROR ROK ROKK KOK Kok RKO Kk 
-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #6: ADAPTER, BLOCK, INTERNAL 


KKKKKKEKKEKKEKKEKEKEKK KKK KKK KKK KKK KKK KK KKK 


-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


Le 


** CARD #26, BUTTON #7: HOUSING ASSY 
kK KKEKEEEKEKE EEK KEKE K EK KEKE EEK EK HK KK 
-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #8: HOUSING, BRNG-GEAR SHAFT 
KekEKKEKEKKEKE KKK KEKE KEKE KEKE KEKE KEE KEK KKK KKK 
-- Graphic Handler may be found in this cards background 
On MouseUp 

GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #9: SCREW, MACHINE, 10-32UNF 


Meee ae eke aaa aaa aa Kaa aa aaa aa aK aaa 


-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #10: SHIM ASSY, LAMINATED 


Me ie ae ee ae eee eae aaa aa aaa aa aK Ka 


-- Graphic Handler may be found in this cards background 


On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #11: ADAPTER ASS Y-INLETGEARBX 
Me ke ae ok ake ake ake ae eee eee ee ee eee eK ok ok ok ok ak ke ok 
-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #12: PACKING,PREFORMED, VITON 
TeeLe Cece eee eee ee ee ee ee ee ee ee ee 
-- Graphic Handler may be found in this cards background 
On MouseUp 

GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #13: NUT, PLAIN, SHAFT 
eR ORR RRR ROR RRR Rk aR Ok i ik aki ak 
-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #14: GEARSHAFT, BEVEL 
Tee ee eee ee ee eee ee ee ee ee 
-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #15: RING, RETAINING 
ee ee ee ee ee ee ee ee 2 
-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #16: NUT, SELFLOCKING,GANG CH 
eR ROR Rk RGR Gk kG RO ak aR ak kok ak ako ake ak ak aka 
-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #17: RETAINER, BRNG, DUPLEX 


me We ake eae ae ae ok ake eae ae ake ake eae ake ake ake ae ake ake ake ake ake ake ake kok oak ake ake ake ake ak 


-- Graphic Handler may be found in this cards background 


On MouseUp 


GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #18: BRNG, BALL 
KRKKKKEKEKEKEKEKEKEKEKEKEKEKEKEEKEKKEKEK KEK KKK KEK KKK KK 
-- Graphic Handler may be found in this cards background 
On MouseUp 

GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #19: NOZZEL, OIL1 
RRR ROR RRR OR RRR RR Rx 
-- Graphic Handler may be found in this cards background 
On MouseUp 

GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #20: NOZZEL,OIL2 
eee eee ee eee eee eee eee ee ee ee ee ee 
-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #21: HOUSING, BRNG, ROLLER 
ae ak ok ak ok ake ake 2k ak ake ake ake ake ake ake ake ok ake ake kak ak ke ake ake ok ak ok ak ok ok ak ok ake ak ak 
-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #22: BRNG, ROLLER, CYLINDRICAL 
ae oak ok ak ok ak kek ak ook ok ak ok ak ak ok kk ak ok ok ok ok ak ok ok ok ak ak ok ok ok ok 
-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #23: RETAINER, BEARING 


ae ok ok ake ak ake kak ake ake ake ake aka ake ake ok ak aka oko ak ak ok ok ako ok ook ake ok ak ok ak ok 


-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #24: NUT, SELF LOCKING,DBLHEX2 


Me ke ake ake kek 2k ke aie ake aie oe ae ak ake ak ake ok ake ake oe ake ake ake ok ake ake ake ak ake ak ak ake ok ake ak 


-- Graphic Handler may be found in this cards background 
On MouseUp 


S 


GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #25: NUT, SELF LOCKING DBLHEX1 
mek oe eke ak ke ake eek ak ak aka ak ok eae oak ak eae ake ae eke 
-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #26: NOZZEL ASSY, OIL 
KkkKkKKKKKK KKK KKK KKK KKK KKK KK KKK KKK KKK 
-- Graphic Handler may be found in this cards background 
On MouseUp 

GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #27: BOLT, MACH, DBLHEX 


KKK KKe KKK KKK KK KKK KKK KK KKK KK KKK KKK KK K 


-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 
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** CARD #26, BUTTON #28: NUT, SELF LOCK, DBLHEX 
me ke ook ke a oe okeookeokeakokeake  eke oeeokako 
-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #26, BUTTON #29: BOLT, MACHINE, AMS 6322 
Meo ak ok ook ak oe ae ake oka aoe ake koe ak oko ok KK ok ok ok ok ok kk ok ok 
-- Graphic Handler may be found in this cards background 
On MouseUp 
GRAPHIC (number of me) 


end MouseUp 


** CARD #34, BUTTON #1: Retum 


Me a ke oe oe oe ee ake ake ake ke ake ok ok ak ok ok ok ok ok ake ok ok ak ok ak ak ok ok ok ok ok 


on mouseUp 


pop card 
end mouseUp 
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APPENDIX B 
APL STACK 
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APPENDIX C 


CSMP STACK 
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SCRIPTS FOR STACK: CSMP 


* * STACK SCRIPT KekkKKKKKKKKKKKK KKK KKK KK KKK KKK KKK KKK 


on closestack 
if the freesize of this stack > 0.15 * the size of this stack then 
doMenu "Compact Stack" 
end if 


end closestack 


on gohome 
play "BYE" 


end gohome 


function CLICKLINE 
return trunc(((scroll of the target) 
+ (item 2 of the clickloc) - (item 2 of the rect of the target 
)) div the textheight of the target) + 1 


end CLICKLINE 


function JULIANDATE 


-- returns julian date 


put the date into CURRENT 


ee 


convert CURRENT to seconds 

put "1/1/" into FIRSTDATE 

put char 4 to 5 of third item of the long date after FIRSTDATE 
convert FIRSTDATE to seconds 

put char 5 of third item of the long date into YEAR 

return YEAR & (CURRENT - FIRSTDATE) div 86400 + 1 


end JULIANDATE 


** BKGND #1, FIELD #1: Description 
Mee ae oe ee ee eee oe eae eae oe ae eae ee eee ee 
on mouseup 

show card picture 

set visible of field “Description” to false 

repeat with 1=1 to the number of buttons 

show button i 
end repeat 
show background button "sorry" 


end mouseup 


** BKGND #1, FIELD #29: FIELD CHOICE 


Me he ake ae ae ake ae hee ee ake ade ake ake ake ake ae ake ake ke ake ae ake ake ake ake ake ake ake ke ok ke ok ak 


On mouseup 
put line clickline() of me into fieldname 


hide me 
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ask"Please enter Search String.” 
put "find" && quote & it & quote && "in field" && - 
quote & fieldname & quote into msg 

hide msg 

send returnkey to hypercard 


end mouseup 


** BKGND #1, BUTTON #1: HELP  ***# #3 #06 4k bk kf Ok ko ik i tok fk dk fk dk ie 
on mouseUp 

PEAY“ HELP: 

push this card 

go to stack "ARGOS HELP" 


end mouseUp 


aK ok BKGND #1, BUTTON Ho Find We ake akc ake ake ake ake ake ake ake ake ake ak aie age aie aie age ake ode ae aie aie ake ae ake aie ae eo oe ae ke ke ok ok 
on mouseUp 

put empty into fld "FIELD CHOICE" 

repeat with count = 1 to number of filds 

put the short name of fld count & return after fld "field choice" 

end repeat 

PLAY "SEARCH" 

show fld "field choice" 

answer "Please select search field" 


end mouseUp 
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** BKGND #1, BUTTON #3: LIBRARY 
ak ake a ke ake ak oe ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ak ke ake ak ke ake ake ake ok 
on mouseUp 

PLAY "LIBRARY" 

push card 

go to card library OF STACK "ARGOS" 


end mouseUp 


a ok BKGND #1, BUTTON #4: EXIT Me ak ak ake ake ake ak ake ae ade abe ake ake abe abe ake abe abe abe ade abe ae ake ae ake ake ake ake ake ake ake ake ake ok ake ok 
on mouseUp 

gohome 

go home 


end mouseUp 


** BKGND #1, BUTTON #5: PRINT (0303: jiaGGi G i io iii oii ok ic tokak tok 
on mouseUp 

set visible of background btn "COVER" to true 

doMenu Print Card 

set visible of background btn "COVER" to false 


end mouseUp 


** BKGND #1, BUTTON #6: Retum 


Me ake aie aie ie aie ate ate ake ake ate ae ake ake ake ake ake ake ake ke ake ke ake ake ake ake ake ake ok ake ake ake ake ake ake ake 


on mouseUp 


play "RETURN" 


12 


pop card 


play “Navigate Mode” 


end mouseUp 


** BKGND #1, BUTTON #7: COVER #48 i foi i folk oi i ioioioi icici i ioiotoi doi ie 
On mousewithin 
SET THE VISIBLE OF me TO FALSE 
end mousewithin 
on mouseenter 
SET THE VISIBLE OF me TO FALSE 


end mouseenter 


** BKGND #1, BUTTON #8: DELETE 
Tet eee eee eee ee eee eee ee ee ee ee ee 2 
on mouseUp 
ASK "WHAT IS THE PASSWORD? " 
IF IT <> "ZAK" THEN EXIT MOUSEUP 
repeat 
domenu delete card 
go next card 
if number of this card = 1 then 
exit repeat 
end if 
end repeat 


end mouseUp 
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** BKGND #1, BUTTON #9: LOCK/UNLOCK 
me ee ae ae ae eae ae ee ae ae aaa 
on mouseUp 
ASK "WHAT IS THE PASSWORD? " 
IF IT @ "ZAK" THEN EXIT MOUSEUP 
REPEAT WITH COUNT = 1 TO NUMBER OF FIELDS 
SET THE LOCKTEXT OF FIELD COUNT TO NOT LOCKTEXT OF FIELD COUNT 
END REPEAT 


end mouseUp 


** BKGND #1, BUTTON #10: WORK PKG 


ae a ae ea ae ie aoe aoe eee eka ae aeoakeakeokeokakakokok ok ok ak ok ok ok ok k 


on mouseUp 
go to card id 6397 


end mouseUp 


* BKGND #1, BUTTON #141: Prev (Eee ES eS SES ESET ESE SEES SSE SS SESS SS SSS 


on mouseStillDown 


visual effect scroll left 


go to prev card of BACKGROUND "CSMP" 


end mouseStillDown 


a BKGND #1, BUTTON #12: Next Be he ae he ae ae ae eae ae a ake ale ah a a ak ai ah ake ake ac ake ake ke a a ake ake ak ake ake ake ake ake ak 


P27) 


on mouseStillIDown 
visual effect scroll right 
go to next card of BACKGROUND "CSMP" 


end mouseStillDown 


** BKGND #1, BUTTON #13: ADD AWR 
tk kkk kkk kkk kk kk kkk kkk kk AR RR RR KE 
on mouseUp 
PLAY "2K" 
push card 
lock screen 
go to stack EQUIPMENT 
put field "UIC" into UIC 
go to first card of stack "CSMP" 
domenu new card 
put JULIANDATE() into field "WD DATE" 
put UIC into field "UIC" 
unlock screen 
select text of field "WC" 


end mouseUp 


** BKGND #2, FIELD #1: PRINT CHOICE 


Kkekkkkkk kk kkk kkk keke ehh kkk hehe keke Keke KhK KKK K 
on mouseup 


put line clickline() of me into SORTNAME 
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ask "What is the Print Criteria?" 
go to first card 
lock screen 
repeat for (the number of cards) 
if (the short id of this card <> 6397) then 
put fid sortname into SORTVAL 
if SORTVAL = it then 
unlock screen 
print card 
lock screen 
end if 
end if 
go next 
end repeat 


end mouseup 
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APPENDIX D 
EQUIPMENT STACK 
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APPENDIX E 
COSAL STACK 
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APPENDIX F 


HELP STACK 
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SCRIPTS FOR STACK: ARGOS HELP 


* STACK SCRIPT Me he aie ate ate ake ae ake ake ake ake ae ae ae ae ake eae aie ake ake ae eae ae eee 


on openStack 
hide menuBAR 
hide message box 


end openStack 


ae ok BKGND #1, BUTTON ps) Next ae Whe ae ae ate ae ah ae ae ae ae aie ae ae ae ae ae ae ae aie ae aie ae ae ae aaa ae ae ae ake 
on mouseUp 

visual effect wipe left 

go to next card of background "HELP” 


end mouseUp 


** BKGND #1, BUTTON #2: RETURN 


ae kk ke ok ake ae aoe eae ake ae ae eae ae ae ae ak ake kak kak ok ok 


on mouseUp 
POP CARD 


end mouseUp 


* BKGND #1, BUTTON #3: Prev (EERE E SEE EERE SER SER ESS SEES ES SESE ES SS 
on mouseUp 


visual effect wipe right 
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go to previous card of BACKGROUND "HELP" 


end mouseUp 


a ik BKGND #1, BUTTON #4: READ PEEPS SES SESS SESE TREE TESTES ESET SESS ES SS 
on mouseUp 
OPEN FILE "NPSCS:hypercardhelp" 


REPEAT 


repeat with count = 1 to 16 

READ FROM FILE "NPSCS:hypercardhelp" UNTIL RETURN 
IF IT IS EMPTY THEN EXIT MOUSEUP 

PUT IT AFTER background FIELD "TEXT1" 


end repeat 


repeat with count = 1 to 16 

READ FROM FILE "NPSCS:hypercardhelp" UNTIL RETURN 
IF IT IS EMPTY THEN EXIT MOUSEUP 

PUT IT AFTER background FIELD "TEXT2" 

end repeat 


domenu New Card 


END REPEAT 


CLOSE FILE "NPSCS:hypercardhelp" 


end mouseUp 


os, 


ek BKGND #1, BUTTON #5: Find PEP ESL SS SSESSZES EEE SE SER SERS EERE SES SS SS 
on mouseUp 

ask “Input the search string: “ 
find it 
hide msg 
put “find” && it into msg 


hide msg 


end mouseUp 


ak ak BKGND #1, BUTTON #6: PRINT whe age ate ahead ae abe age afc ae age ae afc ae ae ae ae ae ade ae abe ae ae ae afc ake he ae abe ae ae ae ae ae ae ae 
on mouseUp 
doMenu Print Card 


end mouseUp 


** BKGND #1, BUTTON #7: LIBRARY 


me me one eae ae ae ae ae ae ae ae ae ae ae aceon aceon ae eae ae ae ae ake ae 


on mouseUp 
PLAY "LIBRARY" 
push card 
go to card library OF STACK "ARGOS" 


end mouseUp 


ae ak BKGND #1, BUTTON #8: EXIT We abe We afc ade ae Menhaden ade ae ae ahead ae ae ate ae Ue eae eae eae ae ahah ae ae ae ae ae 
on mouseUp 


gohome 
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end mouseUp 
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SCRIPTS FOR STACK: FORMS 


* STACK SCRIPT PER RESZZE SES ESE EEE SRE TEES SEE EES EE SSS FS 


on closestack 
if the freesize of this stack > 0.15 * the size of this stack then 
doMenu "Compact Stack" 
end if 


end closestack 


on gohome 
play "BYE" 


end gohome 


function CLICKLINE 
return trunc(((scroll of the target) 
+ (item 2 of the clickloc) - (item 2 of the rect of the target— 
)) div the textheight of the target) + 1 


end CLICKLINE 


on ZAK 


put empty into fld "APPROVED" 


set the locktext of fld "APPROVED" to false 
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click at the location of fld "APPROVED" 
type "Steven Decatur, LCDR, USN" 
set the locktext of fld "APPROVED" to true 


end ZAK 


on PIERRE 
put empty into fld "APPROVED" 
set the locktext of fld "APPROVED" to false 
click at the location of fld "APPROVED" 
type "J.P.Jones, LCDR, USN" 
set the locktext of fld "APPROVED" to true 


end PIERRE 


** BACKGROUND #1: NAVSUP 1250 
eee eee ee eee ee eee eee ee ee ee ee ee 
on returnkey 
if (char 1 to 11 of msg) = “find string" then 
put the id of this card into tempid 
if visible of field "Description" then 
set lockscreen to true 
send retumKey to Hypercard 
if tempid <> id of this card then 
go recent card 
hide card picture 


set visible of field "Description" to true 
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repeat with i=l to the number of buttons 
hide button 1 
end repeat 
hide background button "sorry" 
end if 
set lockscreen to false 
else 
send retumKey to Hypercard 
end if 
else 
send returnKey to Hypercard 


end if 


end returnKey 


** BKGND #1, FIELD #9: REQN QTY 
TST CCC SS SSS TS See Te eee ee ee ee ee ee 
on closefield 
if field "UNIT PRICE" is not empty then 
put field "UNIT PRICE" times field "REQN QTY" into field "OBL AMT" 
end if 


end closefield 


a ak BKGND #1, FIELD 5 0 i QTY Be ae ae abe abe ae ae a ae ae ae ae ae ae a ae ae ae ae ae ae eae ae ae ae ae ae ae ae ae ae ae ake a ae 


on closefield 


if field "UNIT PRICE" is not empty then 


146 


put field “UNIT PRICE" times field "QTY" into field "EXTENDED PRICE" 
end if 


end closefield 


** BKGND #1, FIELD #28: UNIT PRICE 
ae eae ae eae ae ae ae ae ake ae ae ae eee ae eae ake eae ake ae 
on closefield 
set numberFormat to ".00" 
if field "REQN QTY" is not empty then 
put (field "UNIT PRICE" * field "REQN QTY") into field "OBL AMT" 
end if 
if field "QTY" is not empty then 
put (field "UNIT PRICE" * field “QTY") into field "EXTENDED PRICE" 
end if 


end closefield 


ak ak BKGND #1, BUTTON #1: HELP 3 * * * 4 % ek ae ek ek ae ke he kk ek a a a 
on mouseUp 

PEAY “HELP” 

push this card 

go to stack "ARGOS HELP" 


end mouseUp 


ak ak BKGND #1, BUTTON HD: Find Me ae ae ae age age ae ae ae age ae age ae ake ae age ae ake ake ae ake ae ae ake ae age ae age ae ake ake ae ae ae ae ake 


on mouseUp 
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PUSH CARD 
PLAY "SEARCH" 
GO TO CARD ID 4322 


end mouseUp 


** BKGND #1, BUTTON #3: LIBRARY 
eke kek kkk keke keke aKa KK KKK KKK KK KKK 
on mouseUp 

PLAY "LIBRARY" 

push card 

go to card library OF STACK "ARGOS" 


end mouseUp 


a BKGND #1, BUTTON #4: EXIT We ke aie aie ae he ae ae ae ae ae eae eae eae acca cae eek 
on mouseUp 

gohome 

go home 


end mouseUp 


** BKGND #1, BUTTON #5: PRINT 9 **®®8 88 eR ER EERE ER EERE EERE EE KE EEE EEE KK 
on mouseUp 

set visible of background btn "COVER" to tme 

doMenu Print Card 

set visible of background btn "COVER" to false 


end mouseUp 


148 


** BKGND #1, BUTTON #6: Retum 
CTT Te Te TT ee eee eee ee ee eee eee es 
on mouseUp 

play "RETURN" 

pop card 

play "Navigate Mode" 


end mouseUp 


** BKGND #1, BUTTON #7: AUTOTAB 


Me Me Me he te he he ee ae ke eae ee ake ake ae ee ke ae eae ae ae ae ae aaa oe oe kee 

on mouseUp 

REPEAT WITH COUNT = 1 TO NUMBER OF FIELDS 
SET THE TEXTSTYLE OF FIELD COUNT TO BOLD 
END REPEAT 


end mouseUp 


** BKGND #1, BUTTON #8: APPROVE 


i ee ae oe ate ate ake ade ae ak ake ake ake ak ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ake ak 


on mouseUp 
play "PASSWORD PLEASE" 


end mouseUp 


* BKGND #1, BUTTON #9: COVER Me Me ae he ae ae ae he ae he ae he ae ae ae ate ae ae ate a ate ate ae ate ae ae eae ake ae ake ae ake ate ae ae 


on mousewithin 
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SET THE VISIBLE OF me TO FALSE 
end mousewithin 
On mouseenter 

SET THE VISIBLE OF me TO FALSE 


end mouseenter 


** BKGND #1, BUTTON #10: AWR (34:43 AR ORO OR iri oi ei igri iki 
on mouseUp 
set LockScreen to TRUE 
put field "NOUN NAME OR REF SYM" into NOUNNAME 
put field "WC" into WC 
put field “APL/AEL/CID" into APL 
put field "RDD" into DEADDATE 
put field "UIC" into VIC 
put field "JSN" into JSN 
put field "EIC" into EIC 
put field "REQN DATE" into REQNDATE 
go to stack equipment 
find APL in field "APL" 
put field "LOCATION" into LOCATION 
go to stack csmp 
go to first card of background "CSMP" 
domenu new card 
put DEADDATE into field "DEAD DATE" 


put REQNDATE into field "WD DATE" 
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put REQNDATE into field "DEF DATE" 

put NOUNNAME into field "NOUN NAME" 
put APL into field "APL" 

put UIC into field "UIC" 

put WC into field "WC" 

put EIC into field "EIC" 

put JSN into field “JSN" 

put LOCATION into field "LOCATION" 

set LockScreen to FALSE 

select text of field "ID SER" 


end mouseUp 


** BKGND #1, BUTTON #11: DELETE 
eee Cece eee eee ee eee eee ee ee ee ee ee 
on mouseUp 
ASK "WHAT IS THE PASSWORD? " 
IF IT > "ZAK" THEN EXIT MOUSEUP 
repeat 
domenu delete card 
go next card 
if number of this card = 1 then 
exit repeat 
end if 
end repeat 


end mouseUp 


i.) 


ak BKGND #1, BUTTON fie Prev Me ate ake ae ake ate ake ate ah ie ae ate ate ate ate ake ae af ake ate ate ae ae ae ah ate aie ate ate ate ate ae ae ae ake ake 


on mouseStillDown 
visual effect scroll left 


go to prev card of background "NAVSUP 1250" 


end mouseStillDown 


ak a BKGND #1, BUTTON #13: Next ate ate ate ate ate ate ake ake ate he ah ate ate ade ae ae ate ate he af ate she he he hee ake fe he ae ae ae ae ae ae ae 
on mouseStillDown 

visual effect scroll right 

go to next card of background "NAVSUP 1250" 


end mouseStillDown 


** BKGND #2, FIELD #1: FIELD CHOICE 


ae ae ee ate ake ake ae eae ae ae he ae ae ae ae ake ate ae ate ae ae ae ae ae aie ae ae ake ake ake ake ake ae akc 


on mouseup 
put line clickline() of me into FIELDNAME 
ask "Search Criteria?" 
POP CARD 
put "find" && quote & it & quote && "in field" && 5 
quote & FIELDNAME & quote into msg 
hide msg 
send returnkey to HyperCard 


end mouseup 
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APPENDIX H 
DEVELOPERS SCRIPTS 


The following scripts were used in the development of Argos. They are all 
contained in either hidden buttons or hidden fields in the Argos stacks. The 
first script is not contained in any stack, but may be used in a new button to 


show all hidden buttons. 


** script to show ALL hidden background buttons ** 


on mouseUp 
repeat with count = 1 to number of background buttons 
show background button count 
end repeat 


end mouseUp 
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POOP SPER ERSPSESPESSE SESSLER SSE SSSR SE SESS SSE SRSESESSRSESSSSESSESAS SESS SARS SSS SSS SS SD 


Argos Stack Developers Scripts 


kkkkkkkkkkkk kek kkk kk kkk kkk eke kee aK KK KKK KEK KEKE KEKE KK KKK KK KK 


* * BKGND #1, FIELD #4: BUTTONS KKkKKKK KKK KKK KKK KKK KKK KKKK KKK KKK K 


** ysed to auto insert cardlink of an item into the field "DATA" ** 


on mouseup 
GLOBAL CARDID 
put CARDID into SECOND ITEM OF line— 
(clicklineQ) of field "DATA" 
SET VISIBLE OF FIELD "BUTTONS" TO FALSE 
show card picture 
REPEAT WITH COUNT = 1 TO NUMBER OF CARD BUTTONS 
set visible of button COUNT to true 
END REPEAT 


end mouseup 


** BKGND #1, BUTTON #15: GRAPHICS REWRITE *#**####teseseeeeseseeens 


** This script rewites the script of all the graphic card buttons on a card ** 


on mouseup 
REPEAT WITH COUNT = 1 TO NUMBER OF CARD BUTTONS 
set the scnpt of button COUNT to- 


"-- Graphic Handler may be found in this cards background"— 
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& retum & "On MouseUp" & retum &- 
"GRAPHIC (number of me)" & return & "end MouseUp" 
end repeat 


end mouseup 


** BKGND #1, BUTTON #19: INSERT PARTNUMBER 
KKK KKK KKK KKK KKH KKK KK KKK HEHE HEE KEKE KE KK K 
** This script rewites the script of card buttons on a card ** 
** The functionality of this scnmpt was not used in the final version of Argos 
* x 
on mouseUp 

GLOBAL BUTTONNAME 

GLOBAL CARDID 

PUT EMPTY INTO BUTTONNAME 

PUSH CARD 

ASK "INPUT PARTNUMBER" 

GO TO STACK COSAL 

FIND IT IN FIELD "PART NUMBER" 

PUT SHORT ID OF THIS CARD INTO CARDID 

POP CARD 

hide card picture 
REPEAT WITH COUNT = 1 TO NUMBER OF CARD BUTTONS 
set visible of button COUNT to false 
END REPEAT 


IF FIELD "BUTTONS" IS EMPTY THEN 


le 


REPEAT WITH COUNT = 1 TO NUMBER OF CARD BUTTONS 
PUT ((short name of CARD BUTTON COUNT) & "," & COUNT—= 
& RETURN) AFTER FIELD "BUTTONS" 
END REPEAT 
END IF 
ANSWER "PLEASE SELECT BUTTON NAME" 
SET VISIBLE OF FIELD "BUTTONS" TO TRUE 


end mouseUp 


** BKGND #1, BUTTON #20: NONE,NONE 


meee ake ee eee eee eee eee ee eee ee eee eee 


** This script places NONE, NONE on all lines of the field DATA for intermediate 


* 1k 


** development. ** 


on mouseUp 
ANSWER "ARE YOU SURE" 
IF IT > "OK" THEN EXIT MOUSEUP 
REPEAT WITH COUNT = 1 TO NUMBER OF CARD BUTTONS 
PUT "NONE, NONE" INTO LINE COUNT OF FIELD "DATA" 
END REPEAT 


end mouseUp 


** BKGND #1, BUTTON #21: SOMETHING,NONE 


me eke eae aie ae ae ake ae ae ake aka ake ake ae ake ake ake ake ae ake ke ae eae ae ake ak 
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** This script places NONE as the second element on all lines of the field DATA 


* 


** for intermediate development. ** 


on mouseUp 

ANSWER "ARE YOU SURE" 

IF IT > "OK" THEN EXIT MOUSEUP 

REPEAT WITH COUNT = 1 TO NUMBER OF CARD BUTTONS 
PUT (CHAR 17 TO 25 OF LINE 4 OF THE SCRIPT OF BUTTON COUNT)— 
& ", NONE" INTO-— 
LINE COUNT OF FIELD "DATA" 

END REPEAT 


end mouseUp 


a CARD #4, BUTTON #1: other Me A aie he ae aie ie a aie ake ade abe ake ake ake ake ake ak ake ake ake ake ake ake ade ake ak ake ake ake ok ak ake ake ake ak 
** This script was used to demonstrate graphics ** 


** for intermediate development. ** 


on mouseUp 
put the userLevel into saveLevel 
if the userLevel < 3 then set userLevel to 3 -- "Painting" 
if the userLevel < 3 then exit mouseUp 
choose lasso tool 
get the loc of me 


put first item of it into Sizel 
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put second item of it into second item of sizel 
click at sizel with commandKey 

DoMenu copy picture 

set dragSpeed to 150 

drag from sizel to 238,130 

choose browse tool 

set userLevel to saveLevel 

pass mouseup 


end mouseUp 


ae 2k CARD #4, BUTTON #2: SHIP he kc ak ok ak akc ak akc ak ok ak akc ake ake ake akc ak ak ake dca akc ak ak ak ok akc akc akc ake akc ake ak aie akc 


** This script was used to demonstrate graphics ** 


** for intermediate development. ** 


on mouseUp 
put the userLevel into saveLevel 
if the userLevel < 3 then set userLevel to 3 -- "Painting" 
if the userLevel < 3 then exit mouseUp 
put the loc of button "missile" into misstart 
-- 394,246 
put first item of misstart into missileSize 
put second item of misstart into second item of missileSize 
repeat with 1 = 1 to 50 


set loc of button missile to 394,246-1 
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end repeat 

set loc of button missile to missileSize 
choose lasso tool 

get the loc of me 

put first item of it into Sizel 

put second item of it into second item of sizel 
click at sizel with commandKey 
DoMenu copy picture 

set dragSpeed to 150 

drag from sizel to 75,248 

domenu flip horizontal 

drag from 75,248 to sizel 

domenu flip horizontal 

choose browse tool 

set userLevel to saveLevel 

pass mouseup 


end mouseUp 
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keekkkkk kk kk kk kek keke eK KK KKK KKK KKK KKK KK KKK KKK KK KKK KKK KKK KK KKK KK K 


APL Stack Developers Scripts 


kKkkkkkkkkkkkkkkkkkkekekkk kk kekkkkek kkk kkk eK KKK KKK KKK KK KK KK KK 


** script to delete all but one card in APL ** 


on mouseUp 
ASK "WHAT IS THE PASSWORD? ” 
IF IT > "ZAK" THEN EXIT MOUSEUP 
go first card of background apl 
repeat 
domenu delete card 
go next card of background apl 
if (short id of first card of background apl) =-— 
(short id of last card of background apl) then 
exit repeat 
end if 


end repeat end mouseUp 


** script to read data from a text file into the APL stack ** 


on mouseUp 


ASK "WHAT IS THE PASSWORD? " 


IF IT > "ZAK" THEN EXIT MOUSEUP 
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PUT "NPS-CS:THESIS:RAW DATA:APL" INTO FILENAME 

open file FILENAME 

repeat 236 times 
read from file FILENAME for 1107 

end repeat 

repeat 2379 times 
read from file FILENAME for 1107 
put (char (1) to (11) of it) into field "APL" 
put (char (12) to (59) of it) into field "NOMENCLATURE" 
put (char (60) to (68) of it) into field "NIIN" 
put (char (69) to (1054) of it) into field "CHARACTERISTICS" 
put (char (1055) to (1059) of it) after field "FSCM" 
put (char (1060) to (1061) of it) into field "AINAC" 
put (char (1062) to (1063) of it) into field "LSSC" 
put (char (1064) of it) into field "COG" 
put (char (1065) to (1066) of it) into field "ID" 
put (char (1067) of it) into field "AEL COL NUM" 
put (char (1068) of it) into field "FLAG" 
put (char (1069) to (1073) of it) into field "DATE" 
put (char (1074) to (1076) of it) after field "USER" 
put (char (1077) to (1080) of it) into field "EQU CNT" 
put (char (1081) to (1086) of it) into field "POPULATION" 
put (char (1087) of it) into field "SECTION" 
domenu New Card 


end repeat 
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Close file FILENAME end mouseUp 


** script to toggle between locking and unlocking text fields in the APL stack 


* 


on mouseUp 
ASK "WHAT IS THE PASSWORD? " 
IF IT > "ZAK" THEN EXIT MOUSEUP 
REPEAT WITH COUNT = 1 TO NUMBER OF FIELDS 
SET THE LOCKTEXT OF FIELD COUNT TO NOT LOCKTEXT OF FIELD COUNT 


END REPEAT end mouseUp 
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** script to read data from a text file into the Cosal stack ** 


on mouseUp 
ASK "WHAT IS THE PASSWORD? " 
IF IT > "ZAK" THEN EXIT MOUSEUP 
put "NPS-CS:THESIS:RAW DATA:COSAL" into FILENAME 
open file FILENAME 
repeat 16429 times 
read from file FILENAME for 99 
end repeat 
repeat 5 times 
read from file FILENAME for 99 
if it is empty then 
exit repeat 


end if 
put (char (1) to (11) of it) into field "APL" 


put (char (12) to (41) of it) into field "PART NUMBER" 
put (char (42) to (46) of it) into field "FSCM" 


put (char (47) to (61) of it) into field "STOCK NUMBER" 


put (char (62) to (80) of it) into field "ITEM NAME" 
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put (char (81) to (82) of it) into field "COG CODE" 

put (char (83) to (84) of it) into field "UNIT OF ISSUE" 

put (char (85) of it) into field "MATL CONTROL CODE" 

put (char (86) of it) into field "SPCL MATL CONTENT CODE" 
put (char (87) to (89) of it) into field "QUANTITY/APPLICATION" 
put (char (90) to (91) of it) into field "SOURCE CODE" 

put (char (92) to (93) of it) into field "MAINTENANCE CODE" 
put (char (94) of it) into field "RECOVERABILITY CODE" 

put (char (95) of it) into field "ALLOWANCE NOTE CODE" 

put (char (96) to (98) of it) into field "ALLOWED QUANTITY" 
put (char (99) of it) into field "MEC-PT-TO-CMPNT" 

domenu New Card 

end repeat 


close file FILENAME end mouseUp 


** script to delete all but one card in COSAL ** 


on mouseUp 
ASK "WHAT IS THE PASSWORD? " 
IF IT <> "ZAK" THEN EXIT MOUSEUP 
repeat 
domenu delete card 
go next card 
if number of this card = 1 then 


exit repeat 
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end if 


end repeat end mouseUp 


** script to toggle between locking and unlocking text fields in the COSAL 


stack ** 


on mouseUp 
ASK "WHAT IS THE PASSWORD? " 
IF IT < "ZAK" THEN EXIT MOUSEUP 
REPEAT WITH COUNT = 1 TO NUMBER OF FIELDS 
SET THE LOCKTEXT OF FIELD COUNT TO NOT LOCKTEXT OF FIELD COUNT 


END REPEAT end mouseUp 


** script to delete all but one card in COSAL ** 


on mouseUp 
ASK "WHAT IS THE PASSWORD? " 
IF IT <> "ZAK" THEN EXIT MOUSEUP 
repeat 
domenu delete card 
go next card 
if number of this card = 1 then 
exit repeat 


end if 
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end repeat end mouseUp 


** script to toggle between locking and unlocking text fields in the COSAL 


stack ** 


on mouseUp 
ASK "WHAT IS THE PASSWORD? " 
IF IT <> "ZAK" THEN EXIT MOUSEUP 
REPEAT WITH COUNT = 1 TO NUMBER OF FIELDS 
SET THE LOCKTEXT OF FIELD COUNT TO NOT LOCKTEXT OF FIELD COUNT 


END REPEAT end mouseUp 


** script to change all fields to textstyle bold in the COSAL stack ** 


on mouseUp 


REPEAT WITH COUNT = 1 TO NUMBER OF FIELDS 


SET THE TEXTSTYLE OF FIELD COUNT TO BOLD 


END REPEAT end mouseUp 
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** script to delete all but one card in CSMP stack ** 


on mouseUp 
ASK "WHAT IS THE PASSWORD? " 
IF IT <> "ZAK" THEN EXIT MOUSEUP 
repeat 
domenu delete card 
go next card 
if number of this card = 1 then 
exit repeat 
end if 


end repeat end mouseUp 


** script to toggle between locking and unlocking text fields in the CSMP stack 


* * 


On mouseUp 
ASK "WHAT IS THE PASSWORD? " 
IF IT > "ZAK" THEN EXIT MOUSEUP 


REPEAT WITH COUNT = 1 TO NUMBER OF FIELDS 
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SET THE LOCKTEXT OF FIELD COUNT TO NOT LOCKTEXT OF FIELD COUNT 


END REPEAT end mouseUp 


168 


eke aie kak ake aka kai aki ak aki ak ke ake aki a ak keke ak aki aki ak ke ake ak kak a kek ak kak keke keke ke ake ake ke ae ke ake ake ake aie ake ak 


EQUIPMENT Stack Developers Scripts 


Me ee ke aie ae aie he ake eae aie ae he ake ae ake ae eee eae eae ae eae ieee eee eee eae ee ee eee ee eee ee eke eee ake 


** script to delete all but one card in EQUIPMENT stack ** 


on mouseUp 
ASK "WHAT IS THE PASSWORD? " 
IF IT > "ZAK" THEN EXIT MOUSEUP 
go first card of background apl 
repeat 
domenu delete card 
go next card of background apl 
if (short id of first card of background apl) =— 
(short id of last card of background apl) then 
exit repeat 
end if 


end repeat end mouseUp 


** script to toggle between locking and unlocking text fields in the equipment 


Stack ** 


on mouseUp 


ASK "WHAT IS THE PASSWORD? " 


169 


IF IT > "ZAK" THEN EXIT MOUSEUP 
REPEAT WITH COUNT = 1 TO NUMBER OF FIELDS 
SET THE LOCKTEXT OF FIELD COUNT TO NOT LOCKTEXT OF FIELD COUNT 


END REPEAT end mouseUp 


** script to read data from a text file into the EQUIPMENT stack ** 


on mouseUp 
ASK "WHAT IS THE PASSWORD? " 
IF IT > "ZAK" THEN EXIT MOUSEUP 
PUT "NPS-CS:THESIS:RAW DATA:equipment" INTO FILENAME 
open file FILENAME 
repeat 7420 times 
tread from file FILENAME for 303 
end repeat 
repeat 10 times 
read from file FILENAME for 303 
put (char (1) to (10) of it) into field "SWLIN" 
put (char (11) to (21) of it) into field "APL" 
put (char (22) to (26) of it) into field "PRIME KEY" 
put (char (27) to (46) of it) into field "ESD" 
put (char (47) to (66) of it) after field "ESN" 
put (char (67) to (78) of it) into field "EIC" 
put (char (79) to (93) of it) into field "SN" 


put (char (94) to (105) of it) into field "LOCATION" 
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put (char (106) to (109) of it) into field "WC EQPT" 

put (char (110) to (113) of it) into field "WC CMPT" 

put (char (114) to (139) of it) after field "“TYPE/MODEL" 
put (char (140) to (187) of it) into field "FUNCTIONAL DESC" 
put (char (188) to (192) of it) into field "PHM RIN" 

put (char (193) to (193) of it) into field "SEL EQPT IND" 
put (char (194) to (203) of it) into field "SAC" 

put (char (204) to (204) of it) into field "SVC IMP" 

put (char (205) to (205) of it) after field "MIL ESSENTIAL" 
put (char (206) to (216) of it) into field "PARENT APL" 
put (char (217) to (231) of it) into field "PARENT SN" 

put (char (232) to (232) of it) into field "CAT" 

put (char (233) to (239) of it) into field "SCAT" 

put (char (240) to (245) of it) into field "QTY APPL" 

put (char (246) to (247) of it) after field "DATA ORIG" 

put (char (248) to (248) of it) into field "INSTAL STATUS" 
put (char (249) to (250) of it) into field "VAL SPC ACT" 
put (char (251) to (251) of it) into field "RNV" 

put (char (252) to (258) of it) into field "AILSIN" 

put (char (259) to (266) of it) into field "UPDATE JCN" 

put (char (267) to (271) of it) after field "LAST UPDATE" 
put (char (272) to (274) of it) into field "LAST UPDATE USER" 
put (char (275) to (283) of it) into field "UIC" 

put (char (284) to (284) of it) into field "TYPE #" 


put (char (285) to (295) of it) into field "FLAGS" 
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put (char (296) to (300) of it) into field "FSCM" 

put (char (301) to (301) of it) after field "AEL COL #" 
put (char (302) to (302) of it) into field "COS TYPE” 
put (char (303) to (303) of it) into field "ALT FLAG" 
domenu New Card 


end repeat 


close file FILENAME end mouseUp 


** script to change all fields to textstyle bold in the EQUIPMENT stack ** 


on mouseUp 
REPEAT WITH COUNT = 1 TO NUMBER OF FIELDS 
SET THE TEXTSTYLE OF FIELD COUNT TO BOLD 


END REPEAT end mouseUp 


** script to delete all but one card in FORMS stack ** 


on mouseUp 
ASK "WHAT IS THE PASSWORD? " 
IF IT > "ZAK" THEN EXIT MOUSEUP 
repeat 
domenu delete card 
go next card 
if number of this card = 1 then 


exit repeat 
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end if 


end repeat end mouseUp 
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** script to change all fields to textstyle bold in the FORMS stack ** 


on mouseUp 
REPEAT WITH COUNT = 1 TO NUMBER OF FIELDS 
SET THE TEXTSTYLE OF FIELD COUNT TO BOLD 


END REPEAT end mouseUp 
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